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MOVING CHEQUER BOARD 



EDITORIAL 



THIS MONTH'S MAGAZINE 

This month we publish two excellent games, KILLER DICE and BLOCK BLITZ. We 
believe that they compare well with commercially available games despite being 
written entirely in Basic. If you enjoy games, then you will find the time spent 
entering these two programs into your Electron, well worth while. 

Starting this month is a new series which will look at the problems likely to be 
encountered when trying to convert programs from the BBC micro to run on the 
Electron. Several letters have already been received from ELBUG readers seeking 
advice on this topic, and with so much BBC Micro software already around this is a 
potentially fruitful source of programs for the Electron. 

We have also compiled a list for this issue of all the currently available 
commercial software for the Electron. As the quantity of software for the Electron 
is likely to grow rapidly we do not intend to maintain this as a regular feature of 

the magazine. 

POSTBAG 

We have been pleased to receive growing numbers of letters from ELBUG members and 
again some of these are printed in the Postbag section of the magazine. We do like 
to hear from you, and your comments and opinions on the magazine and the Electron 
are always welcome. We will also try to answer technical queries that you may have 
about the use of the Electron, but please enclose an SAE with your letter- 
Mike Williams 




D NOTICE BOARD NOTICE BOA 



ADD-ONS FOR THE ELECTRON 

We have just received our review sample of the SIR expansion board add-on for the 
Electron. Quick tests with a few of the ROMs currently available for the BBC Micro 
(View, BCPL, Toolkit, Exmon and GROM) were promising, but some ROMs will need to be 
re-written before they work correctly on the Electron. We will be publishing a full 
review in a later issue of ELBUG. 

3D ROTATION 

In the production of the January/February issue of ELBUG, the very last part of 
this program (the procedure PROCshift) got lost and is reprinted in full below. 
Despite this, the main rotation and zoom features of the program should have worked 
with no problems at all. 



2230 DEF PROCshift 

2240 REM MOVE CUBE UP/DOWN/LEFT/RIGHT 

2250 hor%=hor%+hmovel 

2260 vert%=vert%+vmove% 

2270 VDU 29,hor%;vert%; 

2280 ENDPROC 
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ELECTRON ADD-ONS - THE LATEST POSITION 

by David Graham 



As we reported last month, there 
appear to be three main contenders . in 
the race to produce add-ons for the 
Electron: Sir Computers, Solidisk 
Technology, and Acorn themselves. Of 
these the latter two have not formally 
launched their product. Acorn's box of 
tricks, we are informed, will probably 
provide an analogue interface (for 
joysticks etc.), a printer port, and 
two ROM sockets. No firm details of 
production dates or price have been 
announced, and all that a spokesman for 
Acorn would reveal was that the unit 
would probably cost under £100. It is 
likely, we think, to be some 
considerable time before the Acorn 
add-on sees the light of day. 

Solidisk Technology demonstrated a 
prototype of their "General Purpose 
Interface" for the Electron to us last 
December. But the production unit will 
be different from the prototype we 
understand, and the functions of their 
add-on seem still to be in a state of 
flux. To the printer port, 
non-proportional joysticks and ROM 
sockets incorporated in the prototype, 
Solidisk are now considering adding a 
disc interface. But as with Acorn the 
product still seems to be at the 
planning stage, and no firm dates or 
prices are available. 

By contrast. Sir Computers appear to 
have two products poised for launch at 
the time of writing: a 12-ROM Board, 
and a Printer and Joystick Interface. 
Both boards should be available by the 
time that you read this article. They 
cost £40 and £45 respectively, 
exclusive of VAT; and the boards are 
said to use a connection system which 
allows one to be plugged into the 
other. Both boards will be individually 
housed in a matching casing. 

SIR 12-ROM BOARD 

As its name suggests, this board 
will take up to twelve ROMS (or Read 
Only Memories) . The purpose of such 
devices is to give the Electron instant 
access to languages other than Basic, 



such as Pascal for example, or 
applications software such as a word 
processor. ROMs (or EPROMs) containing 
such programs are plugged into the ROM 
board, and may be called up instantly 
whenever they are required. Such a ROM 
system is implemented on the BBC micro 
- there are three free ROM sockets 
inside the Beeb - and ROM software has 
proved to be very popular with BBC 
users. In fact some of the ROMs 
currently available for the BBC micro 
may be used without modification on 
Sir's Electron ROM Board, it is 
claimed. Examples given are the two 
word processors View and Bdword, and 
Computer Concept's new Graphics ROM. 
There will doubtless be a flow of 
custom built ROMs for the Electron once 
Sir's board has been released. Our own 
BBC micro ROMs, TOOLKIT (a Basic 
programmer's aid) and EXMON (a machine 
code monitor), will be released for the 
Electron shortly. 

SIR PRINTER AND JOYSTICKS INTERFACE 

Again the title of this board 
defines its function. It gives you a 
printer interface to the so-called 

Centronics standard. This is the same 
as the parallel printer interface on 
the BBC micro, and will allow almost 
any modern printer to be connected to 
the Electron. This allows text and 
programs to be listed out. If in 
addition you want to reproduce graphics 
screens on your printer you will need 
an extra piece of software called a 
screen damp; and we shall be publishing 
a selection of these for the most 
popular printers in due course. 

This second board of Sir's also 
contains a joystick interface. This is, 
we are informed, a standard analogue 

interface which will allow BBC type 
joysticks or other analogue voltage 
sources to be used with the Electron. 

If either of Sir's boards are on 
schedule, we will be reviewing them in 
the next issue. But if you want to find 
out more before then, telephone SIR on 

0222 621813. 
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KILLER DICE 

by D. Jackson 
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Why not treat yourself to our excellent poker dice game, called 
"Killer Dice"? This is a gambling game which involves more thought 
and skill than you might at first think. Like all true gamblers you 
will soon find yourself having just one more game, and one which you 
are bound to win this time! 



For those of you who won't own up to 
having played with poker dice before, 
we start with some basic information. 
There are five identical dice, each 
with six faces representing the 
9, 10, Jack, Queen, King and Ace. When 
the dice are thrown, it is the 
uppermost faces which count, and it is 
these which are displayed on the 

screen. You are playing against the 
computer, taking it in turns to better 
the score of each other until one of 
you loses. At the start of the game, 
both players have 9 lives and the 
contest finishes when one of the 
players has no more lives left. 

Except when you are throwing first 
at the start of a new game, you have 
the option of retaining any of the dice 
on the table and just throwing the 
remainder. This is the course of action 
to follow if some of the dice on the 
table are particularly high scoring. In 
this computer version, you can 'hold' 
any of the dice 1 to 5 by pressing any 
of the number keys 1 to 5 before 
pressing the space bar for your next 
go. If you make a mistake, pressing the 
key marked clears any of the dice 
currently in a hold state and you can 
start again. 

Different combinations of dice have 
different scoring values. Here are the 
winning combinations in order (highest 

value first) : 

6. 3 of a kind 

7. Two pairs 

8. One pair 

9. Ace high 



If a player throws 5 of a kind, his 
partner is given 5 throws to equal or 
better the hand. A full house is when a 
player gets 3 of a kind and a pair 
together . 



1. 


5 of a kind 


2. 


4 of a kind 


3. 


Full House 


4. 


High run 


5. 


Low run 



As you get more experienced at 
playing Killer Dice, you will find 
yourself working out various strategies 
to defeat the computer. You will have 
to try hard to succeed and you will 
also need a certain amount of luck as 
well. 

PROGRAM NOTES 

The program is well structured and 
therefore relatively easy to follow, 
but you will need to take great care 
with the mass of data statements at the 
end. These are cunningly used to define 
the characters that represent each of 
the dice on the screen. The card number 
(9 to 13) indexes to a DATA statement 
which gives the colour followed by the 
15 character definitions that are then 
poked in turn directly into the 
character buffer. Each character is 
dynamically defined as ASCII 224 and 
placed in a text window 3 wide and 5 
deep to produce the dice face. Look at 
the procedure PROCroll at line 2380 to 
see the detail of this. 

One consequence of this technique is 
that renumbering the program in any way 
may well result in a corrupted display 
because of the way the RESTORE command 
is used in the program. 
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10 REM PROGRAM KILLER DICE 

20 REM VERSION E0.1 

30 REM AUTHOR D.JACKSON 

40 REM ELBUG MARCH 1984 

60 : 

70 PtogS="KILLER DICE" 

80 ON ERROR GOTO3110 

90 : 
1000 MODE6:PROCintro 
1010 REPEAT:MODE2:PROCinitz 
1020 REPEAT:VDU17,3,31,0,26 
1030 IF T% PROCyou:ELSE PROCbbc 
1040 PROCthrowtPRCCscore 
1050 IF B% T%=-T%-1:ELSE PROClose 
1060 UNTIL D%:PROCdead 
1070 UNTIL E%:MODE6:PROCend 
1080 END 
1090 : 

1100 DEFPRCCintro 
1110 *FX225,128 
1120 DIMD(5),N(6),P(6),L(1) 
1130 Z%=RND(-TIME):T%=RND(2)-2 
1150 VDU31,12,9:PRINT ProgS 
1160 VDU31,5,17 

1170 PRINT"PRESS SPACE BAR TO CONTINUE" 
1180 VDU31, 17,18 

1190 REPEAT: PROCinkey: UNTIL I%=32 
1200 ENDPROC 

1210 : 

1220 DEFPROCinitz 

1230 VDU23,1,0;0;0;0; 

1240 L(0)=9:L<1)=9 

1250 B%=0:F%=0:V%=1:E%=0:D%=0 

1260 70017,3,31,1,1 

1270 PRINT"LIVES-ELK:9 YOU: 9" 

1280 VDU17,5,31,1,4 

1290 F0RI%=1T05:PRINT;I%;SPC(3);:NEXT 

1300 ENDPROC 

1310 : 

1320 DEFPROCyou 

1330 PRINT"YOU TO GO"; 

1340 Z%=B%OR(-F%>0AND-F%<5) 

1350 IF Z% VDU17,1:PRINT"-INPUT HOLD" 

1360 VDU17,3,31,0,29 

1370 PRINT"-SPACE BAR TO THRCW-" 

1380 REPEAT: PROCinkey: I%=I%-48 

1390 IF Z%:IF I%>0 AND I%<6:PR0Chold 

1400 IF I%=0:PRCCcancel 

1410 UNTIL I%=-16 

1420 ENDPROC 

1430 : 

1440 DEFPROCbbc 

1450 PRINT"MY TURN" :PROCdelay (3) 

1460 IF B%=0 AND F%=0:ENDPROC 

1470 X%=0:Y%=0 

1480 F0RI%=6T0V%STEP-1 

1490 IF N(I%)>X%:X%=N(I%):Y%=I% 

1500 NEXT 

1510 IF X%=1 AND F%=0: ENDPROC 

1520 F0RI%=1T05 



1530 IF D(I%)=Y% PROChold 

1540 NEXT 

1550 ENDPROC 

1560 : 

1570 DEFPROCthrow 

1580 FORI%=1T06:P(I%)=N(I%)ANDB%:NEXT 

1590 PR0Cdelay(2) 

1600 F0RI%=1T05 

1610 IF D(I%)<8 PR0Cdice:VDUl2 

1620 NEXT 

1630 VDU28,0,31,19,15-(B%*2),12,26 

1640 F0RI%=1T05:Z%=D(I%) 

1650 IF Z%<8 PROCdice:PR0Cdelay(l):PR0 
Croll 

1660 NEXT:VDU26:PROCcancel 

1670 ENDPROC 

1680 : 

1690 DEFPROCscore:PkOCdelay{2) 

1700 VDU28,0,17,19,15,12,26 

1710 X%=0:Y%=0:Z%-0 

1720 F0RI%=1T06 

1730 IF P(I%)=0:X%=X%+1 

1740 IF N(I%)=0:Y%=Y%+1 

1750 IF N(I%)>Z%Z%=N(I%) 

1760 NEXT:X%=X%ANDB% 

1770 IF X%=1:IF P(1)=0 OR P{6)=0:X%=4 

1780 IF Y%=1:IF N(1)=0 OR N(6)=0:Y%=4: 
Z%=5 

1790 IF F%=0 AND Y%=5:F%=-6:V%=D (5) 

1800 IF F% PROCfive: ENDPROC 

1810 PROCprompt:PRCCdelay(l) 

1820 IF Y%>X%:Bl=TRUE:ENDPROC 

1830 IF X%>Y%:B%=FALSE: ENDPROC 

1840 B%=1:X%=16 

1850 REPEAT: Y%=6 

1860 REPEAT 

1870 Z%=(P(Y%) OR N(Y%)) AND X% 

1880 IF Z%>0 AND N(Y%)>P(Y%) B%=TRUE 

1890 IF Z%>0 AND N(Y%)<P(Y%) B%=FALSE 

1900 Y%=Y%-1:UNTIL Y%=0 OR B%<1 

1910 X%=X%DIV2:UNTIL X%=0 OR B%<1 

1920 IF B%=1 :B%=FALSE 

1930 ENDPROC 

1940 : 

1950 DEFPROClose 

1960 IF F% ENDPROC 

1970 PROCdelay(3):VDUl7,l,31,2,17 

1980 IF T% PRINT"YOU";:SOUND0,-10,10,1 
ELSE PRINT" I"; :SOUNDl ,-1 0, 1 01 ,8:S0UN 
Dl,-10,81,8 

1990 PRINT" LOSE A LIFE" 

2000 L(-T%)=L(-T%)-1 

2010 VDU17,3,31,(-T%*6)+11,1,48+L(-T%) 

2020 IF L(-T%)=0:D%=TRUE 

2030 ENDPROC 

2040 : 

2050 DEFPRCCdead 

2060 VDU31,4,22,17,9 

2070 IF T% PRINT" YOU ARE"; ELSE PRINT" 
I AM"; 
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2080 PRINT" DEAD" 

2090 VDU17,3,31,0,28 

2100 PRINT'SPACE BAR TO REPLAY"* 

2110 PRINT"OR RETURN TO FINISH" 

2120 REPEAT: PRCCinkey:UNTILI%=320RI%=l 3 

2130 IF I%=13:E%=TRUE 

2140 ENDPROC 

2150 : 

2160 DEFPROCend 

2170 VDU12,17,3,31 ,5,12:PRINT"<BYEEEE"; 

2180 *FX225 

2190 ENDPRCC 

2200 : 

221 DEFPRCChold 

2220 IF F%=-5 ENDPROC 

2230 D(I%)=D(I%)+8 

2240 VDU17,1,31,(I%*4)-3,12,72 

2250 ENDPROC 

2260 : 

2270 DEFPRCCcancel 

2280 FORI%=1T05 

2290 D(I%)=D(I%)AND7 

2300 VDU31,(I%*4)-2,12,127 

2310 NEXT 
2320 ENDPROC 

2330 : 

2340 DEFPROCdice 

2350 Y%=(I%-U*4:VDU28,Y%,ll,Y%+2,6 

2360 ENDPROC 

2370 : 

2380 DEFPROCroll 

2390 SOUND1, -15, 200,1 

2400 N(Z%)=N(Z%)DIV2:Z%=RND(6) :D(I%)=Z% 

2410 IF N(Z%)=0 N(Z%)=1:ELSE N(Z%)=N(Z 
%)*2 

2420 RESTORE (Z%*50) +2750:READC% 

2430 VDU17,C%,17,135 

2440 FORJ%=1TO15:READX%,Y%:!&C04=X%:!& 
C00=Y%:VDU224:NEXT 

2450 VDU17,128 

2460 ENDPROC 

2470 : 

2480 DEFPRCCfive 

2490 B%=0:Z%=-F%<6 AND Y%=5 AND D(5)>= 

V% 
2500 IF Z% V%=1:F%=0:T%=-T%-1 ".ENDPROC 
2510 F%=F%+1:IF F%=0:V%=1 : ENDPROC 
2520 IF F%=-5:T%=-T%-1 
2530 VDU17,2,31,0,15 
2540 PRINT"Five of Kind To Beat" 1 
2550 PRINT"Or Equal In ";-F%;" Throws"; 
2560 IF -F%=1:VDU127 
2570 ENDPROC 
2580 : 

2590 DEFPROCdelay(X%) 
2600 TIME=0:REPEAT:UNTIL TIME=X%*50 
2610 ENDPROC 
2620 : 

2630 DEFPROCinkey 
2640 *FX15,1 



JI 



2650 I%=INKEY(9) 

2660 ENDPROC 

2670 : 

2680 DEFPRCCprompt 

2690 VDU17,2,31,4,15 

2700 IF Z%=1 AND Y%=1 PRINT" Ace High' 

2710 IF Y%=2 PRINT"One Pair" 

2720 IF Z%=2 AND Y%=3 PRINT"Two Pairs" 

2730 IF Z%=4 AND Y%=3 PRINT "3 of a Ki 
nd" 

2740 IF Z%=5 AND N(6)=0 PRINT"Low Run" 

2750 IF Z%=5 AND N(1)=0 PRINT"High Run" 

2760 IF Z%f4 AND Y%=4 PRINT"Full House" 

2770 IF Z%=8 AND Y%=4 PRINT"4 of a Kin 
d" 

2780 ENDPRCC 

2790 : 

2800 DATA0,&107C7C7C,&381 00000, 0,0,&10 

7C7C7C&381 00000 
2810 DATA&7C7C3810,&00000038,0,0,&7C7C 

3810,&00000038 

2820 DATA&l 0380000, &00381 07C,&00381 07C 
,&7C7C3810,&1 0380000, &0038107C 

2830 DATA&38000010,&387C7C7C,0,0,&3800 
0010,&387C7C7C 

2840 DATA&00001038,&7C7C7C10,0,0,&0000 
1038,&7C7C7C10 

2850 DATA1,&10387C38,&1 01 00000, 0,0, &10 

387C38,&1 01 00000 
2860 DATA&7C381 01 0,&1 0,&1 01 038,&7C381 

10,&7C381010,&10 

2870 DATA&38101000,&101038,0,0,&381010 
00,&101038 

2880 DATA&l 0000000, &1 01 0387C,&1 01 0387C 
,&381 01 000, &1 0000000, &1 01 0387C 

2890 DATA&l 01 0,&387C3810,0,0,&1 01 0,&38 

7C3810 

2900 DATA4,&20202021 ,&21 720000, &C2C2FE 
FF,&55540000,&1E0A0800,&800000 

291 DATA&l 01 01 01 ,&1 01 0060,&C0C48082,& 
8288D8C0,&8080808,&80A1E3E 

2920 DATA&F0F0000,&10101 ,&FFFFFE64,&64 
E6C2C0,&FCFC0C08,&8080808 

2930 DATA&l 01 0303,&6060C0C,&93831 1 1 1 ,& 
38386C6C,&8080,&C8C87C7C 

2940 DATA0,0,&3838,&7C7CC6D6,0,0 

2950 DATA2,&20505051 ,&51 220000, &8282FE 
FF,&55540000,&3E1C0800,&800000 

2960 DATA&3030303,&30301 1 1 ,&1 1 11 111 ,&4 
56D0101 ,&9CAAAA88,&9CBE3636 

2970 DATA&F0F0000,&7070707,&FFFFEE44,& 
83839329, &FCFC0C08,&C8C8C8DC 

2980 DATA&l 01 0303, &6060C0C,&93831 111 ,& 

38386C6C,&8080,&C8C87C7C 
2990 DATA0,0,&3838,&7C7CC6D6,0,0 
3000 DATA1 ,&51 506061 ,&51 520000, &1 82FEF 

F,&55540000,&8080800,&800000 
301 DATA&3030303,&1 01 01 51 ,&291 1 1 1 1 1 ,& 

456D0101 ,&88888888,&8080808 
3020 DATA&F0F0000,&3030303,&FFFFFE7C,& 
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C7833901 ,&FCFC0C08,&BE888888 

3030 DATA&l 01 0303,&6060C0C,&93831 111 ,& 
38386C6C,&8080,&C8C87C7C 

3040 DATA0,0,&3838,&7C7CC6D6,0,0 

3050 DATA0, 0,0,0,0,0,0 

3060 DATA0,0,&7E7E7E3C,&3C1 81 800,0,0 

3070 DATA&3070707,&3030101 ,&FFFFFFFF,& 

DBDBBDBD , &C0E0E0E0 , &C0C080 80 



3080 DATA0,&10103,&7E3C1818,&189999DB, 
0,&8080C0 
3090 DATA0, 0,0, 0,0,0 
3100 : 

3110 ON ERROR OFF 

3120 MODE6:IF ERR017 REPORT: PRINT" at 
line ";ERL 
3130 END 



POSTBAG POSTBAG POSTBAG POSTBAG POSTBAG POSTBAG 



ADJUSTING SCREEN DISPLAYS 
Dear Sir, 

The magazine, of which we have now 
received two copies, is excellent. We 
have been impressed with the variety of 
programs and, as we are all new to home 
computers, it has been specially 
gratifying to be able to load the short 
programs and to quickly see the results 
of our handiwork. I have also had 
reason to be grateful for the Rescue 
program in issue two, when I 
inadvertently loaded a second program 
over part of a previous one! 

Please can you tell me how I can go 
about solving a problem I have with the 
Electron. I am losing the top line of 
print on my TV screen which can be very 
annoying. Is there anyway of correcting 
this? R.Pendell 

Reply: Thanks for the compliments Mr 
Pendell. Unfortunately there is no way 
that you can change the position of the 
picture on the TV screen from your 
Electron. However, it should be 
possible to make an internal adjustment 
to your TV. This should only be carried 
out by a competent technician. 

CONVERTING PROGRAMS FOR THE ELECTRON 

Dear Sir, 

In your first issue of ELBUG you 
stated that Electron programs were 
tested on an Electron, then loaded into 
a BBC micro for printing. 

Can we assume then that any Electron 
program will load into a BBC, and more 
importantly, can some BBC programs be 
loaded into an Electron? 

Some guidance on this would, I 
think, be appreciated by all your 
readers. P.M.Beecham 

RepI^: Most Electron programs will run 
alright on the BBC micro, unless they 
access directly some hardware feature 
that is Electron specific. You may find 



that the results are different, for 
example faster games, different sounds 
etc. Because of its additional 
features, it is much less likely that a 
program designed for the BBC micro will 
run properly on the Electron without 
some modification. Because there is 
already plenty of software for the BBC 
micro, many Electron users will be 
interested in trying to convert some of 
these programs and we have started this 
month a short series of articles which 
examines this topic in some detail. 

TV/MONITOR RESOLUTION 
Dear Sir, 

Being one of the few people who 
actually own an Electron, I am now 
wondering what type of display to buy 
for it. At the moment I use it mainly 
with a black and white portable TV, but 
was thinking of buying a colour 
portable. 

One of the main reasons I decided on 
the Electron was its excellent high 
resolution display. However, it wasn't 
until after I bought the computer that 
I read that most colour TVs can only 
show about 350 by 200 pixels. It seems 
that the Electron's display is being 
wasted on an ordinary TV and even most 
monitors can't match the Electron's 
high resolution mode. D.E.Gordine 

Reply: The maximum resolution of the 
Electron is 640 horizontally by 256 
vertically, though the apparent drawing 
area seems to be to a higher 
resolution - see this month's article 
on Electron Graphics. The Electron's 
medium resolution of 320 by 256 thus 
reasonably matches the figure which you 
quote. In practice you will get a much 
sharper picture from either a monitor 
or a TV/monitor with an RGB input. The 
main reason for the improved picture 
quality is that picture degradation in 
the UHF IF circuitry of the TV is 
avoided in a monitor or TV/monitor. 
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ELECTRON SOFTWARE LIST 

Compiled by Alan Webster 



We thought that it would be helpful to Electron owners to publish a comprehensive 
list of all the software, currently available for the Electron, that we could find. 
You should be able to buy Electron software through computer shops, chain stores 
such as W.H.Smith, and by mail order as advertised in various magazines. The list of 
software that can be run on the Electron will no doubt grow rapidly. Indeed, there 
may already be new titles released by the time you read this. We shall continue to 
review the most interesting software in ELBUG. Prices include VAT. 



Title 


Type 


Price 


Code 


Title 


Type Price O 


x3e 


3D Maze 


CM 


7.50 


11 


Graphics Pack 


UT 


24.95 


SI 


Airline 


CM 


6.95 


CI 


Graphs 


ED 


9.95 


SI 


Bandits at 3 O'clock 


CM 


7.95 


PI 


Graphs and Charts 


UT 


9.20 


A2 


Bugblaster 


CM 


7.95 


Al 


Hype rd rive 


CM 


7.50 


11 


Caterpillar 


CM 


7.50 


11 


Intergalactic Trader 


CM 


8.95 


PI 


Chess 


GM 


9.20 


A2 


Invaders 


GM 


7.50 


11 


Chess 


CM 


7.95 


PI 


Killer Gorilla 


CM 


7.95 


PI 


Corn Cropper 


CM 


6.95 


CI 


Labyrinths of LaCoshe 


CM 


7.95 


PI 


Creative Graphics 


UT 


9.20 


A2 


LISP 


L 


16.10 


A2 


Cyber tron Mission 


CM 


7.95 


PI 


Meteors 


CM 


9.20 


A2 


Dallas 


(M 


6.95 


CI 


Monsters 


CM 


9.20 


A2 


Draughts and Reversi 


GM 


9.20 


A2 


Moonraider 


CM 


7.95 


PI 


Draw 


UT 


9.95 


PI 


Personal Money Managment 


9.20 


A2 


Escape From 








Pontoon and Patience 


CM 


7.50 


11 


Moonbase Alpha 


GM 


7.95 


PI 


Positron 


CM 


6.95 


PI 


Felix in the Factory 


CM 


7.95 


PI 


Primary Art 


ED 


7.95 


Al 


Felix and The 








Primary Time 


ED 


7.95 


Al 


Fruit Monsters 


CM 


7.95 


PI 


Scribe II 


UT 


9.95 


Al 


Flags 


ED 


7.50 


11 


Snake 


CM 


4.00 


Bl 


FORTH 


L 


16.10 


A2 


Starship Command 


GM 


9.20 


A2 


French Tutor 


H/ED 


9.95 


SI 


Stratobomber 


CM 


7.50 


11 


Fruit Machine 


CM 


5.95 


Al 


Swoop 


GM 


7.95 


PI 


Galactic Commander 


GM 


7.95 


PI 


Tree of Knowledge 


ED 


9.20 


A2 


Golf 

f m w ^ M £T & & M & JF M~ & M 


CM 


7.95 

' # # ^ s 


SI 


Vectors 
'^ s jj^*********a 


ED 
r ***J 


9.95 


SI 
f ** 


SOFTWARE SUPPLIERS CHECKLIST 


**** 


//// 


/xxxxxy/x///xx/ 


****. 


WW^JTM 


M *. 



Code Supplier 

Al Alligata, Superior Systems, 
178 West Street, 
Sheffield SI 4ET. 



PI 



SI 



A2 
Bl 

CI 

II 



Acornsoft, 4a Market Hill, 
Cambridge CB2 3NJ. 

BEEBUGSOFT, P.O. Box 109, 
High Wycombe, Bucks HPll 2TD. 

Cases Computer Simulations, 

14 Langton Way, London SE3 7TL. 

IJK Software, Unit 3c, Maorfields 
Moor Park Ave., Bispham, 
Blackpool, Lanes FY2 0JY. 



Program Power, 8/8A Regent 
Street, Chapel Allerton, 
Leeds LS7 4PE. 

Salamander Software, 

117 Norfolk Road, Brighton, 

East Sussex BN1 3AA. 





Program Classification 


ED 


- Educational 


CM 


- Game 


UT 


- Utility 


H 


- Home use 


B 


- Business 


L 


- Computer Language 
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THE SPIDER AND THE FLY 

by Anthony Sykes 



The amusing animated display that is provided by the program 
presented here is a good example of the screen displays that can be 
produced with user-defined characters on the Electron. 



First of all, carefully type the 
program into your Electron before 
saving on cassette. When you run the 
program, it shows a spider dangling on 
the end of a web, waiting for the 
moment when the lid on the jar opens, 
enabling it to consume the large fly 
inside which buzzes about trying 
unsuccessfully to escape. Every so 
often the fly pauses for a while before 
continuing its futile activity. 
Inevitably, the spider always does 
catch the fly in the end. 

PROGRAM NOTES 

The spider is displayed in two 
positions initially, once in the 
flashing black/white (colour 8), and 
just below that in flashing white/black 

(colour 15) in lines 5010 and 5020. 
This gives the impression of the spider 
moving up and down. The fly is moved 
around randomly inside the jar by first 
displaying the fly in green and then 
again in the background colour, so 
making it disappear (lines 5040 to 
5090). Occasionally the fly has a rest, 
and then restarts after a short delay 
which may be terminated early by 
pressing any key. The number of rest 
periods allocated to the fly depends on 
the random value generated in line 
4010. 

The program is well structured using 
a number of procedures. 



Function 

Defines characters 
and sets up variables 
Displays the fly 
Displays the spider 
Sets up the screen 
Controls animation 
The spider gets its 
meal! 



PROCspifly sets up the user-defined 
characters for the spider and the fly. 
Note how the character strings flyS and 
spiderS are built up in a manner 
similar to that described in our series 



Line 


Name 


1000 


PROCspifly 


2000 


PROCfly 


3000 


PRCCspider 


4000 


PROCinit 


5000 


PROCaction 


6000 


PROCending 



on Electron graphics. PROCfly and 
PROCspider respectively display the two 
creatures in the required colours. 
PROCinit draws the jar and initialises 
the variables ready for use in 
PROCaction, which looks after the main 
animation. PROCending is called once 
the jar is opened, and the spider eats 
the fly! 



"-■" II 





10 

20 
30 
40 
50 
60 
100 
110 



REM Program SPIDER 

REM Version E0.2 

REM Author A. SYKES 

REM ELBUG MARCH 1984 

REM Program sub jet to copyright 



ON ERROR 
MODE 2 



GDTO 190 



120 PROCspifly 



PROCinit 
REPEAT 
PROCaction 
UNTIL FALSE 
END 



II 



130 

140 

150 

160 

170 

180 : 

190 ON ERROR OFF:MODE 6: REPORT: PRINT 

at line ";ERL:END 

200 : 

DEF PROCspifly 

VDU 23,240,0,0,0,20,43,65,128,0 

VDU 23,241,24,24,24,102,129,153,2 



1000 
1010 
1020 
55,66 
1030 
1040 



VDU 23,242,0,0,0,40,212,130,1,0 
VDU 23,243,195,36,24,102,153,129, 
195,126 )) 
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1050 VDU 23,244,192,176,76,35,17,33,78 

,112 

1060 VDU 23,245,90,90,165,165,165,165, 

126,90 
1070 VDU 23,246,3,13,50,196,136,132,11 

4,14 

1080 VDU 23,247,66,165,165,153,66,129, 
0,0 

1 090 spiderS=CHR$ (240) +CHRS ( 241 ) 4CHRS ( 
242) 

1 1 00 f ly$=CHR$ (243) +CHRS (1 0) +CHR$ (8 ) +C 
HRS (8) +CHRS (244) +CHRS (245) +CHRS (246) +CH 
R$ (1 0) +CHRS (8) +CHR$ (8) +CHR$ (247) 

1110 ENDPROC 

1120 : 

2000 DEF PRCCfly(col%,A%,B%) 

2010 COLOUR col%:PRINTTAB(A%,B%)fly$ 

2020 ENDPROC 

2030 : 

3000 DEF PRCCspider(col%,A%,B%) 

3010 COLOUR col%:PRINTTAB(A%,B%)spider$ 

3020 ENDPROC 

3030 : 

4000 DEF PROCinit 

4010 T%=0:P%=RND(6):A5=CHRS95+CHRS95 

4020 B$=" "+STRING$(6,CHR$32)+"[" 
4030 COLOUR 14:PRINT TAB (4, 24) "SPIDER 

& FLY" 
4040 COLOUR 7:PRINT TA8(6,20)SPC(8) 

4050 VDU 23,1;3;0;0;0; 

4060 COLOUR 7: PRINT TAB{6,6) AS;"===="; 
A$ 

4070 FOR T%=7 TO 18:PRINT TAB(6,T%)3$: 
NEXT 

4080 MOVE400,415:DRAW872,415 

4090 COLOUR 7:FOR H%=0 TO 6: PRINT TAB( 
3,H%)" ":NEXT 



ii 



4100 ENDPROC 

4110 : 

5000 DEF PROCaction 

5010 PROCspider (8,2,6) 

5020 PROCspider (15,2,7) 

5030 VDU5:MOVE195,828:GCOL0,7:PRINT" 
:VDU4:VDU 23,1 ;0;0;0;0; 

5040 X%=RND(4)+7:L%=RND(4)+7 

5050 PROCfly(2,X%,L%) 

5060 TIME=0:REPEAT UttfTIL TIME>5 

5070 PROCfly(0,X%,L%) 

5080 T%=T%+l:SOUND 1,-15,L%,3 

5090 IF T%=60 THEN SOUND 1,-14,5,3 ELS 
E 5040 

5100 PROCfly(10, 10,15) 

5110 A=INKEY(300):P%=P%-1:IF P%=1 THEN 

PROCending 

5120 PROCfly(0,10,15) 

5130 T%=0:GOTO 5010 

5140 ENDPROC 

5150 : 

6000 DEF PROCending 

6010 COLOUR 7:PRINT TAB(6,6)A$;SPC(4) ; 
AS 

6020 A=INKEY(100) 

6030 PROCspider (0,2,6) : PROCspider (0,2, 
7): PROCspider (3,9, 14) 

6040 COLOUR 0:FOR H%=0 TO 6: PRINT TAB( 
3,H%)"|":NEXT 

6050 PRCCfly(0,10,15) 

6060 FOR Q%=50 TO 1 STEP -l:SOUND 1,-1 
5,Q%,1:NEXT 

6070 COLOUR 5:PRINT TAB(6,20) "YUM YUM!" 

6080 A=GET 

6090 PROCinit 

6100 ENDPROC 



POINTS ARISING 



It seems as though some of the gremlins escaped from 'Return of the Diamond', 
published in issue 2 of ELBUG, and instead got up to mischief in the listings of two 
other ELBUG programs in previous issues, causing some minor but annoying bugs. The 
correct details are listed below. We would like to thank those readers who wrote to. 
us about these problems and we hope that we have now rounded up all the gremlins and 
returned them to where they will cause no more harm. 

ASTAAD_ (issue No. 2) 

A semi-colon was lost from the end of line 350. 
350 VDU23,1,0;0;0;0; 

Hedgehog (issue No.l) 

The procedure PROCGO was incorrectly called PRCC_GO in line 1050. 
1050 REPEAT: N%=N%+1 :PRCCGO:UWTIL N%=4 

Most of you will probably have spotted this last error and corrected it already. 
We shall double check in future to try and avoid any further errors cropping up in 
our program listings. 



RLBUG 



March 1984 



Volume! Issue-4 



12 



ELECTRON GRAPHICS (Part 4) 

by Mike Williams 



Our introductory series on Electron graphics has so far concentrated 
on user-defined characters. This month we begin to look at the use 
of the DRAW and PLOT commands that will enable us to display a 
variety of lines and shapes on the screen. 



The Electron has five graphics modes 
(modes 0, 1 , 2, 4 and 5) . In these 
modes we can use the commands MOVE, 
DRAW and PLOT to create straight and 
curved lines and a variety of geometric 
shapes. In any graphics mode, we can 
think of the screen as a drawing area 
which is 1280 points wide and 1024 
points high. Initially, the bottom left 
hand corner of the screen is the point 
(0,0), the top left hand corner is the 
point (0,1023), the bottom right hand 
corner is (1279,0) and the top right 
hand corner is (1279,1023). Notice that 
the numbering both vertically and 
horizontally starts at zero. This makes 
the bottom of the screen the 
and the left hand side of 
the 'y' axis. The bottom 
corner (0,0) is the origin. 



Table 1 



'x' 



axis 

the screen 
left hand 



Now, although we can create any 
drawing based on the measurements given 
above, the Electron is actually capable 
of displaying far fewer points on the 
screen, the number depending on your 
choice of mode. The relationship 
between the actual number of points and 
the measurements above is called 
resolution, a larger number of points 
producing higher resolution graphics, 
and a smaller number of points lower 
resolution graphics. In practice, a 
straight line drawn with high 
resolution graphics will normally 
appear as a thinner line on the screen 
than one drawn in low resolution 
graphics. 

On the Electron, three different 
resolutions are available (low, medium 
and high) , and this choice is also 
coupled with the number of colours that 
you can use and the amount of memory 
taken up, as shown in table 1 . 

In a graphics mode, the (COL 
command, described briefly last month, 
is used to select the drawing colour. 



Graphics 


Number 


dumber j 


Memory 


Resolution 




Mode 


of 
Points 


of 
Colours 


Used 









640X256 


2 


20K 


High 




1 


320X256 


4 


20K 


Medium 




2 


1 60X256 


16 


20K 


Low 




4 


320X256 


2 


10K 


Medium 




5 


160X256 


4 


10K 


Low 





Resolution in different graphics modes. 

while CLG is used to clear the graphics 
screen. As with text, the default is to 
draw in white on a black background. 
The MOVE command, which was also used 
last month, can be used to move to any 
point on the graphics screen while the 
DRAW command is used to draw a straight 
line from the last point specified (in 
a MOVE, DRAW or similar command) to the 
new point. When starting with any 
graphics mode, the starting point is 
always the origin (0,0) . 

DRAWING SQUARES AND TRIANGLES 

Suppose we want to draw a square in 
the centre of the screen with a side of 
length 200. The following short program 
will do this. 

100 MODE 4 
110 MOVE 540,412 
120 DRAW 540,612 
130 DRAW 740,612 
140 DRAW 740,412 
150 DRAW 540,412 
160 END 

The centre of the screen is 
(640,512) and thus the corners of the 
square are at points which are 100 more 
or less than these values. Note how the 
program moves to one corner and then 
draws the four sides, finishing back at 
the starting point. The program is in 
Mode 4 (medium resolution) . Whether you 
actually see an exact square or not on 
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your screen is very likely to depend on 
your TV (or monitor) and how it is 
adjusted. You might like to try 
different modes to see the same result 
in high and low resolution graphics. 



it is 



to put the instructions 
a particular shape as a 



In creating graphics programs, 
often useful 
necessary for 
procedure. This also enables us to 
introduce more flexibility. If you are 
not familiar with procedures then refer 
to page 77 in the User Guide. Here are 

the instructions as above, now modified 
as a procedure, which enables the 
square to be placed any size anywhere 
on the screen. 

1000 DEF PROCsquare(size,x,y) 

1010 MOVE x,y 



1020 DRAW 

1030 DRAW 

1040 DRAW 

1050 DRAW 



x,y+size 



x+size,y+size 

x+size,y 

x,y 

1060 ENDPROC 
The procedure PROCsquare requires 
three parameters, the length of the 
side of the square, and the 
co-ordinates of the bottom left hand 
corner of the square. In order to draw 
a shape like this anywhere on the 
screen, we have to decide upon one 
corner as a reference point from which 
the other corners can be calculated. I 
have also written a short program to 
illustrate the use of the procedure. 
This consists of an infinite loop which 
randomly selects a size and position 
for squares which are continually drawn 
on the screen. Press Escape to 
terminate this program. 

10 REM Program SQUARE2 
20 REN Version E1.0 

REM Author Mike Williams 

REM ELBUG March 1984 

REM Program subject to Copyright 



30 

40 

50 

60 

100 

110 

120 

130 

140 

150 
160 
170 
180 
190 
200 
line 
210 
220 



M0DE4 

ON ERROR GOTO 190 

REPEAT 

SIZE=RND(1000) 

X=RND(1279) :Y=RND(1023) 

PROCsquare (SIZE, X,Y) 

UOTIL FALSE 

END 

■ 
• 

ON ERROR OFF: MODE 6 
IF ERR017 THEN REPORT: PRINT" at 
" ; ERL 
END 




One interesting point that you 
should notice when you run this program 
is that squares which are so positioned 
that part of the square disappears off 
the screen cause no problems or errors 
at all. In effect, the screen area is 
like a window onto a much larger area 
on which you can still draw, but not 
see the results. Try typing the 
following short program: 



,100 MODE 4 

110 MOVE40,200 
'l 20 DRAW640,1500 

130 DRAW1 200,200 

140 DRAW40,200 

150 END 



This draws a triangle with the 
vertex above the top of the screen at 

(640,1500). This is a very nice feature 
of Electron graphics, as your programs 
need never check that you are actually 
drawing on the visible screen, though 
clearly there is not much fun to be had 

in deliberately drawing where you 
cannot see the results. 

DRAWING CIRCLES 

Although the DRAW command will only 
produce straight lines on the screen, 
we can still write programs that will 
produce acceptable circles. This is 
done by drawing a series of short 
straight lines. The length and number 
of lines needed will depend on how much 
of a purist you are, but it is 
initially surprising how few lines are 
needed to produce a realistic looking 
circle. The result will also depend on 
the size (radius) of the circle. Of 
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course, the more lines that have to be 
drawn, the longer the drawing process 
will take. 

To draw a circle does require some 
mathematics, though you don't really 
need to understand exactly what is 
going on. We can draw a circle by 
calculating the positions of a number 
of points equally spaced around the 
circumference, and then joining all the 
points up with straight lines. In 
practice, each short line is drawn as 

the next point is calculated. Each 
point on the circumference is 

calculated using the two formulae: 



x = R 



:os(A) 



y 



= R 



SIN(A) 



where R is the radius of the circle, 
and A is the angle between the x axis 
and the radius to the point being 
calculated. The angle must be measured 
in radians (rather than degrees) and a 
complete revolution of a circle is 2*pi 
radians. Fortunately, BBC Basic helps 
us enormously here, as the two 
mathematical functions, cosine and 
sine, are provided (COS and SIN) , and 
even the value of pi is included (as 
the pseudo-variable PI) . 

The two formulae given above assume 
that the origin (0,0) is at the centre 
of the circle, but we have already seen 
that this is normally in the bottom 
left hand corner of the screen which is 
not very helpful. However we can move 
the origin to a new position using the 
VDU29 command (see the User Guide page 
113). The following program will draw a 
circle with a radius of 200 at the 
centre of the screen. 



100 MODE 4 

110 VDU29,640;512; 

120 radius=200 

130 MOVE radius, 

140 FOR angle=0 TO 2*PI STEP PI/16 

150 x=radius*COS (angle) 

160 y=radius*SIN (angle) 

170 DRAW x,y 

180 NEXT angle 

190 END 

The program first moves the origin to 
the centre of the screen (640,512), 
which now becomes the new origin and 
thenceforth all co-ordinates are 
measured from this new position. The 
starting point for drawing the circle 



is on the circumference at (200,0) , 
with reference to the new origin. A 
loop is then used to repeatedly 
calculate a new point on the 
cicumference (rotating anti-clockwise) 
and draw a straight line from the 
previous point to this one, until we 
arrive back at the starting point. The 
last number on line 140 is half the 
number of lines used to make up the 
circle. 

You might like to try running the 
program with both larger and smaller 
values to see the effect that this has 
on the shape of the 'circle*. Of 
course, what we are really doing is 
drawing a polygon with a large number 
of sides that then appears to us as a 
circle. This means in turn that by 
changing this number you can use the 
same routine for drawing any polygon 
that you want. For example, if you put 
2, you should get a square, while 4 
should give an octagon (half the number 
of sides in each case) . 

You may find that some values, 
because of the limitations of computer 
arithmetic, do not produce a closed 
polygon. If this happens, then 
replacing '2*PI' with '2*PI+0.V in 
line 140 will usually overcome this 
problem. 

If we want to produce a program that 
will draw several circles, then it is 
sensible to write the instructions as a 
procedure, just as we did for the 
square. We can define the procedure 
with three parameters, allowing a 
circle to be drawn with any radius, and 
in any position on the screen. We could 
just package up the original circle 
procedure, putting a VDU29 command as 
the first instruction in the procedure 
to define a new origin at the centre of 
the circle to be drawn. However, 

because of the mathematical sines and 
cosines used in the formulae, circle 

drawing is a relatively slow process. 

If we want to draw several circles, 

then we can speed up the process 
considerably by calculating all the 

necessary sines and cosines just once, 
and then saving them for use later when 
drawing a circle. This is done in the 
following program. The procedure 
PROCtable calculates a table of sines 
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and cosines, which are 
procedure PROCcircle 
drawing a circle. 



then used by the 
for actually 



10 

20 
30 
40 
50 
60 
100 
110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 



REM Program CIRCLE2 

REM Version E1.0 

REM Author Mike Williams 

REM ELBUG March 1984 

REM Program subject to Copyright 

• 

MODE 4 

ON ERROR GOTO 210 

DIM C(32) ,S(32) 

PRCCtable 

REPEAT 

radius=RND(800) 

x=RND(l 279) :y=RND (1023) 

PRCCcircle(radius,x,y) 

UNTIL FALSE 

END 

■ 

ON ERROR OFF:MOD£6 
REPORTrPRINT" at line ";ERL:END 

9 

DEF PROCtable 

FOR 1=1 TO 32 

angle=2*PI*I/32 

C(I)=COS(angle) :S(I) =SIN(angle) 

NEXT I 

ENDPROC 

m 

* 

DEF PROCcircle(radius,x,y) 

LOCAL I,X,Y 

VDU29,x;y; 

MOVE radius, 

FOR 1=1 TO 32 

X=radius*C(I) :Y=radius*S(I) 

DRAW X,Y 

NEXT I 

ENDPRCC 



The circles are drawn as polygons of 
32 sides and hence 32 sines and cosines 

are calculated and saved as the 
elements of the two arrays C and S. The 
procedure for drawing a circle first 
sets a new origin as the centre of the 
circle and then draws the circle as 
before except that the sines and 
cosines are taken from the two arrays 
instead of being calculated when 
needed. If you run the program, which 
draws random sized circles randomly on 
the screen, you will see how much 
quicker this is compared with the 
original circle drawing program. The 
pause that occurs at the start is the 
time to calculate the sines and cosines 
initially. 




DRAWING POLYGONS 

The final program to be presented 
this month shows how the circle drawing 
idea can be adapted to draw a polygon, 
with any number of sides, together with 
al I the diagonals joining every vertex 
to every other vertex. The vertices of 
any regular polygon are evenly spaced 
out around the circumference of a 
circle which thus forms the basis for 
the method of drawing. Because every 
vertex will be referred to several 
times, the x and y co-ordinates of each 
vertex are calculated first and stored 
in the two arrays X and Y. This is just 
like calculating the points around the 
circumference of a circle without the 
line drawing. 

Once all the points are known, two 
nested loops are then used to draw all 
the lines. The outer loop, controlled 
by the variable I, is repeated once for 
each vertex, while the inner loop, 
using the variable J, is repeated a 
reducing number of times. If you 
experiment with an octagon, for 
example, you will see the principle 
involved. From the first vertex 7 lines 
are needed, 6 from the second, 5 from 
the third and so on. This is exactly 
how the routine works, 



The whole polygon is drawn by the 
procedure PRCCpolygon with four 
parameters, the radius of the circle 
(or size), the number of sides, and the 
centre of the circle (or polygon) . The 
origin is set to the centre using the 
VDU29 command and the co-ordinates of 
all the points needed are calculated 
and saved. 
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PLOT conmand and the drawing of filled 
shapes on the screen. 



The procedure is called just once 
and displays a 16 sided polygon in the 
centre of the screen complete with all 
the diagonals. You could try varying 
the parameters to produce different 
displays and the program could easily 
be extended to draw several polygons 
together on the screen, in different 
positions and either the same or 
different sizes. There is plenty of 
scope for experimenting with all these 
examples. 

Next month we will continue the 
series on graphics by looking at the 
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REM Program P0LY1 

REM Version El .0 

REM Author Mike Williams 

REM ELBUG March 1984 

REM Program subject to Copyright 

♦ 

MODE 4 

ON ERROR GOTO 160 

DIM X(64) ,Y(64) 

PROCpolygon ( 500 , 1 6 , 640 , 51 2) 

END 

ON ERROR 0FF:M0DE6 
REPORT:PRINT" at line ";ERL:END 

DEF pROCpolygon(radius, sides, x,y) 

VDU29,x;y; 

FOR 1=1 TO sides 

angle=2*PI*I/sides 

X(I)=radius*COS(angle) 

Y (I) =radius*SIN (angle) 

NEXT I 

FOR 1=1 TO sides 

FOR J=I+1 TO sides 

MOVE X(I),Y(I) 

DRAW X(J),Y(J) 

NEXT J, I 

ENDPROC 



HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS 



TAB 

When calculating TAB positions remember that the co-ordinate of the top left hand 

corner of the screen are 0,0 not 1,1. 

*SAVE EXTENSION - M.Sykes 

When using *SAVE to save a file, the usual method is to type: 
*SAVE <filename> <start address> +<length> <execution address>. 
This can be expanded to include the load address of the file when loaded back into 

the computer. 

The load address is normally taken to be the start address of the file. The load 
address is appended to the end of the normal set of numbers, i.e. *SAVE <filename> 
<start address> <+length of file> <execution address> <load address>. If the load 
address is typed in as FFFF then the computer cannot load the file back into memory 
unless the *LOAD <filename> <load address> command is used, offering an easy method 
of software protection, but do make a list of the necessary load addresses. 

COLOUR VIDEO OUTPUT 

The Electron is capable of producing colour pictures on the composite video 
output socket by joining link LK4. This link is situated behind Q7 and next to IC1 3 
(which is labelled LM324N) . The reason why Acorn did not connect this link is 
because the picture quality is degraded relative to the black and white picture 
obtained from the same socket. However, there is only a slight increase in the 
quality of colour from this socket and the output from the UHF output. The ROT 
output produces by far the best picture. 
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Inside your Electron there is a ROM 
(Read Only Memory) containing the 
Operating System (OS for short) which 
controls much of what goes on in your 
machine. As time goes by, it is 
possible that new versions of the 
operating system will be produced, 
either to incorporate some new 
features, or to correct •bugs' or 
faults, which have been discovered in 
existing ones. To find out which 
version of the operating system is in 
your machine, Acorn have provided a 
special call. Try the following: 

*FX0 <return> 
You should find that your Electron has 
replied by displaying 'OS 1.00". The 
' 1.00* is the version number, and it is 
by looking at this that you can tell 
which version you have. If there are 
any later versions, then they may well 
increase this number (for example 1.10 
or 1.20). The BBC Micro is similar to 
the Electron in many 
already been through 
different versions of 
system to incorporate 
present in 
an American 
has now been produced. All of these are 
different versions of essentially the 
same operating system. 

As well as the operating system, 
Basic is also contained within the same 
ROM in your Electron. To allow for the 
possibility that this may also need to 
be changed. Acorn have provided a way 
to tell which version of Basic is 
present (there is only one version at 
the moment, but that does not mean 
Acorn will not decide to produce 
another version) . To see the way in 
which the Basic is identified, press 
the Break key on your Electron. Now 
type in: 

REPORT <return> 
You should see a line of text displayed 
saying '(C) 1982 Acorn'. 

So far, we have seen how we can tell 
which versions of the operating system 
and Basic are in our machine. The 
messages displayed tell us which 
version, but not which machine. For 



ways, and has 
a number of 
its operating 
features not 
the original. In addition, 
version of the BBC micro 



example we could have OS 1.00, but is 
it an Electron, a BBC Micro, or an 
American BBC Micro operating system? 
Because of the inherent similarities 
between the machines mentioned above, 
it is tempting, particularly for 
producers of commercial software, to 
write one piece of software and to 
modify it slightly for the different 
machines, than to write three pieces of 
software to do the same thing on the 
three different micros mentioned. To 
allow a program to distinguish between 
the different machines, the INKEY 
command has been extended. If you look 
in your User Guide, you will notice 
that there is no key whose negative 
code is given as 256. The function 
INKEY-256 will return a value depending 
on the machine and operating system 
with which it is used. The current 
range of possible values is shown in 
the table. 



Operating System 
Electron 1 .00 
BBC 0.10 
BBC 1.00/1.20 

BBC USA 



Value Returned 

1 



-1 

254 



Table showing values returned by 
INKEY-256 on different machines. 



If you type: 

PRINT INKEY-256 
on your Electron then the value 'T 
should be displayed and this value 
could be checked within the program 
itself by assigning it to a variable 
rather than just displaying it on the 
screen. For example, try running the 
following program: 

10 IF INKEY-256=1 THEN PRINT "This is a 
n Electron." ELSE PRINT "This is not an 
Electron, it must be a BBC Micro." 
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MOVING CHEQUER BOARD 



by D. D. Harriman 



This month we bring you a short and fascinating graphics program by 
D.D. Harriman. This is a striking example of the animated graphics 
that can be achieved simply by switching colours using a VDU 
command. 



This program presents the black and 
white squares of a chequer board in 
such a way that the squares appear both 
to get larger and move towards you as 
you watch. Just type the program into 
your Electron and then run it to see 
the visual effects that result. 



produced by drawing different parts of 
an object in different logical colours 
(initially all set to black), and then 
highlighting each part in turn using 
the VDU 19 command. Ttiis program shows 
just how effective the results can be. 




The program is essentially based on 
the use of the VDU 19 comma'hd (see User 
Guide page 107). This is of the form: 

VDU19,L,A,0,0,0 
where L is the logical colour number 
(the range depends on the mode 
selected) and A is the actual colour 
(from to 1 5) . The program uses mode 2 
which allows 16 logical colours. The 
chequer board is drawn initially using 
14 of these colours which are then 
repeatedly changed between black and 
white to give the effects that you 
observe. The other two colours out of 
the 16 are used to provide white text 
and graphics against a black background 
in the top part of the screen. 

Many effective animations can be 



PROGRAM DESCRIPTION 



the 
of 

the 
to 



After some initial assignments 
program starts by drawing bands 
colour, decreasing in width, from 
bottom of the screen up 
approximately the halfway point (lines 
150 to 190). The next routine (lines 
210 to 270) uses exclusive OR plotting 
to draw perspective bands (each made of 
two triangles) across the horizontal 
lines. Each such band is four times as 
wide at the front as it is at the rear. 
Having done this the moving chequer 
board effect is produced by repeatedly 
executing the procedure PROCspeed which 
uses VDU19 to switch the colour 
assignments. W= have embellished the 
area above the chequer board with some 
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additional text and graphics (lines 290 
to 380). You could easily define this 
area as a text and/or graphics window 
where other images could be produced. 



SOME 
J% 



X% 



Y% 



USEFUL VARIABLES 

- determines the width and hence 
number of squares across the 
screen. 

- sets the x co-ordinate for the 
centre of the circle. 

- controls the height of the 



oow 



10 REM Program CHEQUER 

20 REM Version E0.2 

30 REM Author Delos D.Harriman 

40 REM ELBUG March 1984 

50 REM Program subject to Copyright 

60 : 
100 M0DE2:0N ERROR GOTO 530 
110 J%=64:A$="ELBUG " 
120 VDU23;11,0;0;0;0 

130 COLOUR7:COLOUR143:VDU19,15,0;0;12 
140 X%=640:Y%=640:R=640:Y=Y%:C%=-1 
150 FOR F=l TO 6 STEP 0.03 
1 60 C%=C%+1 :C%=C%- (C%=7) : IFC%=1 5:C%=0 
170 GCOL0 r 128+C%:L=Y:Y=Y%/F 
180 VDU24,0;Y%-L;1279;Y%-Y;:CLG 
190 NEXT:VDU26:«:OL3,8 
200 : 

210 FOR F%=-640 TO 639 STEP J% 
220 MOVE640+F%,Y%-Y:XH=640+F%*4 
230 MOVE X1%,0:F%=F%+J%:X2%=640+F% 
240 Y2%=Y%-Y:PLOT85,X2%,Y2% 
250 PLOT85,640+F%*4,0 
260 MOVE X1%,0:DRAW X2%,Y2% 
270 NEXT:QCOL0,7 
280 : 

290 FOR C=l TO 4 STEP 3 
300 FOR 1=0 TO PI STEP Pl/C/32 



Yl-Y 
AS 



chequer board on the screen, 
marks the actual height of the 
chequer board on the screen, 
the text displayed on the screen 
at the end. 



If you change the FOR statements at 
lines 410 and 440 to count in the 
reverse direction (up instead of down) , 
you will find the chequer board moves 
away from you instead of towards you. 



:^:>->:-^x-;-:-;;:^-;-:<-:v:-:v:-;-:^:-:-:-:---:-^: 

■ I T - - I t VVtVV ***4V*V1***4*1 ******* 



■>:*:* >:o 



c»:o»» 



310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
line ' 
550 



XI =X%+R*COS ( I ) /C : Yl =Y%+R*S IN { I ) /C 
MOVEX%,Y%-Y:DRAW Xl,Yl-Y 
NEXTI,C:PRINT TAB(0,9); 

• 
* 

F0RI%=1 TO 3:F0R F%=1 TO LEN(A$) 
PRINT MIDS(A$,F%,l);:PROCspeed 
NEXTF%,I% 
REPEAT:PRCCspeed:UNTIL FALSE 

DEF PRCCspeed 

FOR A%=6 TO STEP -1 

VDUl9,A%,7;0;:VDUl9,A%+8,0;0; 

PROCW:NEXT 

FOR A%=14 TO 8 STEP-1 

VDU19,A% f 7;0y:VDUV9,A%-8,0?0; 

PRCCW:NEXT 
ENDPRCC 

■ 

■ 

DEFPROCW 

T%=TIME: REPEAT UNTIL TIME-T%>1 

ENDPROC 

* 

ON ERROR OFF: MODE 6 
IF ERR017 THEN REPORT: PRINT" at 
•;ERL 

END 



HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINT 



EXTRA FUNCTION KEYS 

The Break key can be programmed as function key 10. The most useful definition is 

*KEY10 OLD|M 

Then when this key is pressed, it automatically retrieves 
break; though if you press the key with no program in 
"Bad Program" message. 

In a similar way, the cursor and copy keys may also be 
keys 11 to 15, by using *FX4,2. This disables their normal 
with the following function key values: 



your program 
the machine you 



after the 
will get a 



programmed as function 
function, replacing them 



COPY 11, LEFT 12, RIGHT 13, DOWN 14, UP 15 



PLOT EQUIVALENCE 

All PLOT commands can be replaced with a VDU command of the form 
where K f X,Y have the values outlined in the User Guide on page 176. 



VDU 25,K,X;Y; 
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SOUND ENVELOPE EDITOR 

by Ian Soutar and Mike Williams 



This month we present a program which not only makes it very easy to 
design and experiment with sound envelopes but shows you graphically 
on the screen exactly what the envelope looks like each time, 



The Electron has two sound channels, 
one capable of producing tones (channel 
1) and the other generating a variety 
of noises (channel 0) . Sounds do not 
just happen by themselves, but must be 
programmed like any other feature of 
the Electron, using in this case the 
SOUND and ENVELOPE commands. Now 
although the SOUND command is not too 
difficult, a quick look in the User 
Guide is often enough to put many 
people off from trying to understand 
and use the ENVELOPE command. The 
program that is included with this 
article is designed to help you 
understand sound envelopes and to allow 
you to experiment with sound by means 
of an easy to use sound and envelope 
editor. The User Guide also contains a 
whole chapter detailing the SOUND and 
ENVELOPE commands beginning on page 

116. 

SOUND COMMAND 

The SOUND command on the Electron 
has the following format: 

SOUND c , v , p , d 
where c is the sound channel (0 or 1), 
v is the volume or loudness, which on 
the Electron is either on (-15) or off 
(0), p is the pitch of the note played 
and d is the duration of the note. Both 
pitch and duration can be changed using 
the Sound Etfitor. Using the sound 
command alone will produce just single 
notes. Much more interesting effects 
can be produced by using a sound 
envelope . 

On the Electron the amplitude of a 
note cannot be varied, and is simply 
switched on and off. It is the pitch of 
the note that is varied using the 
ENVELOPE command, and the resulting 
graph or shape of the note as time 
passes is called a sound envelope. Once 
an envelope has been defined in a 
program it can be used with any SOUND 
command by replacing the 'v' parameter 
by the envelope number (in the range 1 
to 16). 



SOUND AND ENVELOPE EDITOR 

Although the ENVELOPE command used 
on the Electron has a total of 14 
parameters, only eight of these are 
meaningful, the other six being set as 
recommended in the User Guide to 

maintain compatibility with the BBC 
micro. The Sound Editor allows you to 
change any of these eight parameters, 
immediately displaying the new sound 
envelope graphically on the screen. In 
experimenting with different envelopes, 
the program provides six options. These 
are: 



C (Change) 



to be 



N (Next) 



E 
P 

D 

L 



Allows parameters 

changed . 

Moves on to the next 

parameter. 

Ends the program. 

Allows the pitch of the 

note to be changed. 
(Duration) Allows the duration of 

the note to be changed. 
(Listen) Plays the current sound. 



(End) 
(Pitch) 



Each time any parameter is altered, 
a new graph of the sound envelope is 
immediately displayed. There is full 
checking on all the sound and envelope 
parameters displayed, and the sound may 
be heard at any time by pressing 'L' . 
Once you are satisfied with a sound 

that you have produced, you can copy 
down the sound and envelope parameters 
from the screen and use them in any 
program of your own. 

CREATING ENVELOPES 

The eight parameters of the envelope 
command are concerned with the 
definition of the pitch envelope (see 
page 121 in the User Guide). The visual 
display of the pitch envelope is an 
indispensable aid to understanding and 
producing really good sound effects for 
use in any program. When you first run 
the sound editor, the sound and 
envelope parameters are already set up 
as follows: 
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s Pil Pi 2 Pi 3 Prl Pr2 Pr3 
1 40 40 40 

pitch = 50 duration - 20 




You will see that the pitch envelope 
is a straight line, and if you press 
'L' you will hear a single unchanging 
note that lasts for 1 second. The 
duration of a sound is given in 
twentieths of a second and hence a 
duration of 20 is equivalent to 1 
second. The pitch, which is part of the 

SOUND command, can be altered by 
pressing 'P'. The range allowed is to 
255 while values outside this range are 
converted within the program by adding 
or subtracting 256 until the value is 
within range (the SOUND command does 
this automatically) . Try entering 
different values of pitch and duration 
to see the effect. 

VARYING THE PITCH 

At the moment, the note produced by 
the sound editor is of constant pitch. 
To make it vary we need to alter one or 
more of the pitch increment parameters 
Pil, Pi2, Pi3. Each controls the rate 
of change of pitch in one of three 
segments of the pitch envelope. Try 
changing Pil from (no change) to 3. 
The graph of the pitch envelope shows 
an angled line taking the pitch up from 
50 to 170, where it straightens out. If 
you press 'L' you will hear it do this. 
In fact it increases at the rate of 3 
units of pitch for each 40 units of 
duration (since Prl defines the 
duration of the first segment) - it 
thus increases by a total of 120 units 
taking it from 50 to 170. 

The other two segments can be 
altered accordingly. If you change Pi2 



to 1 , you will see that in the second 
segment the note now continues to 
increase in pitch, but at only one 
third of the rate of the first segment. 
If you change Pi 3 to -4 the pitch will 
drop by 4 x 40 units returning it to 
the starting value of 50. If you want 
to hear a number of full cycles of this 
sound, just increase the duration. 
Taking it from 20 to 60 should give 3 
full cycles. 



1 


F 7 " /\ ] 


1 




1 


8 38" 68 12* 

% Pil Pi2 Pi3 Prl Pr2 Pr3 J 
I l 2 2 -2 30 38 60 j 

k C)h*Of* H)#xt E)nd PMtoti D>uration J 

^L Oisttn 3« 2* M 


1 




H 
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1 





If you require only a two segment 
pitch envelope, you can amalgamate two 
adjacent segments. This is done by 

giving them the same Pi factor. Thus if 
you change Pil and Pi 2 both to the 
value 2, you will get an uneven two 
segment inverted "V" shape envelope. If 
you want to make it symmetrical, just 
make Prl + Pr2 = Pr3, and change Pi 3 to 
-2. A little experiment will show why. 
The values Pil = 2, Pi2 = 2, Pi3 = -2, 
Prl = 30, Pr2 = 30, Pr3 = 60 thus 
produce a symmetrical inverted "V" of 
duration 1.2 seconds. 

You can change the starting pitch by 
altering pitch on the screen - but note 
that if the envelope takes the pitch 
outside the range to 255, then there 
will be a wrap-around effect (so that 
going below zero causes a jump to 255 
etc). The audio effect can be quite 
interesting, though the screen plot 
does not take the wrap-around effect 
into account. You will also find that 
in some cases the values displayed 
beside the axes of the graph overlap 
and become unreadable. 

RAPID PITCH CYCLES 

A different kind of sound effect can 
be achieved by executing a whole series 
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of much shorter pitch envelopes. 

achieve this, return duration to 

and enter the following values into 

pitch envelope: 

s Pil Pi2 Pi3 Prl Pr2 Pr3 
1 20-15-15 6 3 3 

pitch = 50 duration ■ 20 



To 
20, 
the 




This produces quite an interesting 
sound. Note that the duration of each 
pitch envelope is 0.12 seconds (the 12 
on the right hand side of the graph) , 
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10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

,E%<5) 

160 

170 

180 

190 

E%(7)) 

200 

210 

220 

230 
240 
250 
260 
270 



RE1 PROGRAM ENVELOPE EDITOR 

REM AUTHOR I.SOUTAR 

REM VERSION El .0 

REN ELBUG MARCH 1984 

REM PROGRAM SUBJECT TO COPYRIGHT 

DIM E%(7),P$(7),1%<7,1) 

M0DE1 :PROCstart 
VDU19, 1,6, 0,0,0 
ON ERROR GOTO 750 
CLS:PR0Cgraph:PROCedit(l ,7) 
END 

DEFPRCCplay 

ENVELOPE 1,E%(1),E%(2),E%(3),E%(4; 

, E% (6), E% (7), 126, 0,0, -126, 126, 126 

SOUNDl,l,p%,d% 

ENDPRCC 

DEFPRCCgraph:h=l 1 52/ (E% (5) +E% (6) + 

VDU24,0;420;1279;1023;:CLG 

v=p%:V=p%:FOR I%=2T04 

V=V+E%(I%)*E%(I%+3):IF V>v v=V 

NEXT:V=v:IF v=0 v=l 

v=480/v 

OCOL0, 3:MOVEl 279, 51 2 

DRAW1 27,51 2: DRAW! 27,1 023 

MOVE127,(512+p%*v) 



so there are about 10 full cycles in 
the duration specified. The pitch 
envelope is still, as you see, an 
inverted "V", though not a completely 
symmetrical one. Changing the pitch to 
220 to give a wrap-around makes quite a 
different sound. Making the envelope 
more oblique further changes the 
effect. Try the following: 

s Pil Pi2 Pi3 Prl Pr2 Pr3 
1 -12-12-12 6 4 2 

pitch = 220 duration = 20 

There are many different effects 
that can be produced in this way - 
either by changing the overall shape of 
the envelope or by using the 
wrap-around effect, and this can be 
left for experiment, though here are 
three more, the first of which produces 
a tremolo or warble. Each uses a pitch 
setting of 220 (though the duration 
expends on how long you wish the sound 
effect to continue) . 

s Pil Pi2 Pi3 
1 i-i-i 

1 127-1 -1 
1 -12 -1 -1 



Prl 


Pr2 


Pr3 


6 


3 


3 


6 


3 


3 


6 


3 


3 
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280 P%=p%:Q%=0:GCOL0,2 

290 F0RII=2T0 4:P%=P%+E%(I%)*E%(I%+3) 
:Q%=Q%+E%(I%+3):DRAW(127+Q%*h),(512+P%* 
v) :NEXT 

300 VDU5:MOVE-10 / 528:PRINTSPC(3) ;"0": 
MOVE-10,528+p%*v:PRINTFNstr(p%) :MOVE-l 
, 5 1 2+V*v : PRINTFNstr (V) 

310 Q%=0:FORI%=5TO7:P%=0:IFI%=5 THEN 
P%=32 ELSE IF I%=7 P%=-32 

320 Q%=Q%+E%(I%) :MOVEQ%*h+P%,500:PRIN 

TFNstr(Q%*E%(l)):NEXT 

330 VDU4:VDU26 

340 ENDPRCC 

350 : 

360 DEFPRCCedit (S%,F%) : J%=0:FORI%=S%T 
O F%:COLOUR3:J%=J%+1:PRINTTAB(J%*5,20) ; 
P${I%) ;:C0L0UR1 :PRINTTAB(J%*5-1 ,22) ;FNs 
tr(E%(I%)):NEXT 

370 COLOUR3:PRINTTAB(0,26)"C)hange N) 
ext E)nd P)itch D)uration":J%=l 

380 PRINT"L) isten"; :COLOURl :PRINTTAB( 
1 9) FNstr (p%) ;TAB (28) FNstr (d%) 

390 : 

400 PRINTTAB(0,29);STRING$(79,CHR$32) 

410 PRINTTAB(J%*5,23)CHR$32;:X$=GET$: 

IFX$="N"THENJ%=J%+1 :GOTO510 

420 IFX$="E" VDU22,6:END 
430 IFX$= M L"PRCCplay:GOTO400 
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440 IFX$="D" PRINTTAB(0, 29) "Duration 
(0 to 255)";:INPUTIP$:d%=FNip(d%) MOD 2 
56:PROCgcapn:PRINTTAB(28,27)FNstr(d%):G 
OTO400 

450 IFXS="P ,f PRINTTAB( 0,29) "Pitch (0 
to 255)";:INPUTIP$:p%=FNip(p%) MOD 256: 
PRCCgraph:PRINTTAB(19,27) ;FNstr (p%) :GOT 
0400 

460 IFXS<> U C"VDU7:GOTO400 

470 X%=S%+J%~1:PRINTTAB(0, 29) "Range o 
f ";P$(X%);" is ";1%(X%,0);" to ";1%(X% 
,l):PRINT"Change to ", -STRINGS (20,CHR$32 
) :INPUTTAB (11,30) ,IP$: IF IP$<>"" E%(X%) 
=VAL(IP$) 

480 IFE%(X%)<1%(X%,0) OR E%(X%)>1%(X% 
,1)VDU7:GOTO470 

490 IFS%=1 PRCCgraph 

500 PRINTTAB(J%*5-1,22)SPC(4);TAB(J%* 
5-1,22);FNstr(E%(X%)):VDU28,0,31 ,39,29: 
CLS:VDU26 

510 IFJ%=F%-Sl+2 J%=1 

520 GOTO390 

530 IFS%=0 PRCCgraph 

540 GOTO390 

550 ENDPROC 

560 : 

570 DEFPROCq(x,q$,y) : IFq$="A"H=0:Q=0 



580 IFxO0H=H+x*v:Q=Q+x/100:MOVEHl+H 
, 490 : PRINTqS :MOVEy , 4 50 : PRINTq$"=" ; INT {Q 
*100)/100 
590 EN0PRO2 



600 
610 
620 
630 
640 
650 



DEFFNip(vl) 

IF IP$="" VL=vl ELSE VL=VAL(IPS) 

=VL 



DEFFNstr (n) =STRINGS (4- (LEN (STR? (n 
) )) ,CHR$32)+STR$(n) 
660 : 

670 DEFPROCstart 
680 p%=50:d%=20 

690 F0RI%=1T07:READP$(I%) :READ1%(I%,0 
) :READ1%(I%,1):NEXT 

700 DATA " s",0,255,Pil,-128,127,Pi2, 
-128,127,Pi3,-128,127,Prl,0,255,Pr2,0,2 
55, Pr3, 0,255 

710 F0RI%=1T07:READE%(I%):NEXT 
DATA 1,0,0,0,40,40,40 
ENDPROC 



720 
730 
740 
750 
760 
770 
780 



ON ERROR OFF 
IF ERR=17 GOTO 
REPORT: PRINT " 
END 



100 ELSE M0DE6 
at line ";ERL 



HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINT 



CURSOR CONTROLS 

The cursor movements are all defined in the ASCII (American Standard Code for 
Information Interchange) code, and can be incorporated into strings for formatting a 
print statement. For exaiiple, if you want to print 'Electron' vertically on the 
screen, instead of TABbing each character individually into its position, you can 
use the following routine: 

10 PRINT TAB (10,10) ; 

20 VDU 69,10,8,108,10,8,101,10,8,99,10,8,116,10,8,114,10,8,111,10,8,110 

30 END 

Line 10 sets the cursor to the initial starting position, line 20 prints out the 
characters of the message, and moves the cursor down and to the left after each 
letter is printed. The relevant codes are: 
8 move cursor to the left one position 9 move cursor to the right by one position 

10 move cursor down one line 11 move cursor up one line 

13 move cursor to the start of the current line 

WIDTH 

The WIDTHx command allows any text printed on the screen to be displayed in a 
column x characters wide. Normally there is no limit, and the computer overflows to 
the next line. To obtain the default setting, enter WIDTH0. 



GETTING RID OF ? ON INPUT 

INPUT ""AS will 
quotes, but you must 
will be output. 



not print 
not put a ' 



a question mark. A message can be 
after the message, otherwise the 



put between the 
question mark 
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GRAPHICS SOFTWARE FOR THE ELECTRON 



reviewed by David A. Fell 



Two companies, Program Power and Salamander Software, have released 
programs for the Electron which exploit the graphics capabilities of 
this micro. On closer examination, the two packages turn out to be 
quite different products, the one from Salamander Software being a 
quite respectable colour graphics package, while that from Program 
Power is more of a programming language (based on Logo) for 
producing black and white drawings. David Fell has tried both 
packages and reports in detail below. 




Title : 
Suppl ier : 
Pr ice : 
Rating : 



DRAW 

Program Power 

£8.95 inc. VAT 



*** 



Both parts of this package are 
written in Basic, and loading is very 
easy. One fact that became obvious once 
the programs had loaded was that this 
was a BBC Micro version in an Electron 
case. The title page was a Mode 7 
display, and included double height 
control codes, which the Electron could 
not apply to its display! 

The package provides a new 
programming environment for the user. 
Some Electron owners may already have 
taken the time to investigate the 
'Turtle' program provided on the 'B' 
side of the 'Vfelcome' cassette and 
described in the book "Start 
Programming with the Electron" by 
Masoud Yazdani that comes with the 
Electron. DRAW provides similar 
facilities, but also has other 
features. All interaction with the 
package takes place in mode 4, with the 



screen neatly split into two halves 
vertically. The left hand half is used 
for prompting, while the right hand 
half displays useful information. 

Drawing consists of a series of 
commands that are similar to some Basic 
commands. For example, the following 
DRAW 'program' will produce a square on 
the screen: 

SQUARE SIZE 

repeat 4 

move SIZE 

turn 90 

end repeat 

finish 

The first line names a procedure as 
'SQUARE' , and gives it the parameter 
SIZE. This allows the routine to be 
used to produce a square of any given 
size, for example: 
SQUARE 100 
will draw a square of size 100 units. 




If you follow through the commands 
comprising the program, you should see 
how logical and simple a program in 
DRAW, (and Logo for that matter) , can 
appear. Using procedures like these as 
building blocks, you can go on to 
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define very complex routines to draw a 
variety of geometrically based shapes 
on the screen. 

Programs are stored internally with 
an identifying name. When, you ask to 
run a program (achieved merely by 
pressing 'R'), then all the names of 
the programs held within memory are 
listed out, along with an associated 
number. You now type in this number, 
press Return, and the program is run. 
As you may have gathered, DRAW allows 
more than one program to be resident in 
memory at once. In fact, you can have 
up to 20 programs in memory together, 
each with up to 30 lines. 



The commands allowed within 
are: 



a program 



move 
turn 
repeat 
end repeat 



program 

pen up 
pen down 

finish 



Title 
Supplier 
Price 
Rating 



Electron Graphics System 
Salamander Software 
£9.95 inc. VAT 



. **** 



The Electron Graphics System from 
Salamander Software is a flexible and 
powerful piece of software that allows 
you to create your own screen images in 
any of the *20k' modes (i.e. modes 0, 
1 , and 2) , and to store and later 
recall them from tape. The cassette is 
attractively packaged, complete with a 
well printed manual. A similar package 
launched some time ago for the BBC 
micro, has already proved very popular, 
and this Electron program is based on 
that version. 



Loading the system is 
being accomplished by 
mandatory 

CH."" <return> 



very easy; 
the almost 



and the two parts of the program load 
fairly quickly. Also provided on the 
tape are some example screens, which 
show 'mountain drawing*, apparent 
motion by means of colour redefinition, 
and 'tree drawing'. These are produced 
in modes 2, 1 and respectively 
{Personally, I found the tree a little 
strange) . 



In addition to this, you may use any 
procedures of your own that you have 
already defined. 

CONCLUSION 

The DRAW package seems well thought 
out, and provides clear menus to help 
the inexperienced user. The manual is a 
photocopied one, and lacks the 
legibility in places that one would 
expect of Program Power, but the 
description of the program is more than 
adequate. The program is apparently 
designed to run on both the Electron 
and the BBC Micro. When available, the 
program will be able to take advantage 
of a printer, if attached, to produce a 
hard copy dump of the screen. The 
program could, however, have been 
better prepared for the Electron 

(Program Power have said a new version 
will be produced) , and I would think 
that most users will find the Turtle 
program on the 'Welcome' cassette to be 

quite adequate. 




When the program is running, the 
screen is split into two parts. The 
top, and larger part, contains the 
drawing which is being produced, with 
the lower section displaying various 
prompts and other information. The 
sequence of commands used to generate 
any picture is remembered by the 
program as the picture is built up, and 
there are facilities to erase the 
effects of the last command, and to 
redisplay the picture in the state that 
it was in before the last command was 
executed. This allows for any mistakes 
to be corrected. 

Ttie commands available are both 
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powerful and comprehensive. The cursor 
keys are used to position the cursor (a 
flashing set of cross hairs), and the 
Space Bar is used to 'fix' a point. For 
example, the command for a line is 'L', 
and the system then prompts for the 
'start 1 of the line. The user moves the 
cursor to the desired start point, and 
then presses the Space Bar. The system 
then prompts for the 'next' point, and 
this is indicated in the same manner. 
As the cursor is moved to the next 

flashing line is displayed to 
where the final line would be 

in the current position. This 
banding' facility is a very 
useful feature, allowing you to see the 
result of drawing a line before it is 
finally fixed. 

Other facilities available include 
parallelogram drawing from any three 
points, circle and arc drawing, 
physical and logical colour changes, 
text displays from any position on the 



point, a 
indicate 
if drawn 
'elastic 



screen , 
pattern 



filling of 
repetition. 



any shape, and 



The shape filling is achieved by 
using the built in PLOT extension, and 
so does not cope completely with 

complex shapes, small areas often being 
left unfilled. A more flexible routine 
could have been written to do this, but 
this would have used more memory, and 
hence reduced the complexity of picture 
that can be produced. Indeed, apart 
from the slightly 'sluggish' handling 
that results from a Basic program 
running in the high resolution modes, 
this is probably my only other 
criticism of the package. Whilst 
reading the manual, I spotted a number 
of errors, but a conversation with 
Salamander Software revealed that a new 
manual will be produced to correct 
these. 

CONCLUSION 



The package is well produced and 
allows for some quite effective 
pictures to be created and saved to 
tape. I would recommend this package to 
any Electron owner. interested in 
experimenting with graphics. 



HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINT 



ALTERNATIVE ESCAPE ACTIONS 

If you find that you keep pressing the Escape key accidentally whilst running a 
program, then you may be interested to know that it is possible to redefine almost 
any key to return the escape action by using *FX220. For example *FX220,5 will only 
give the escape condition if you press the Control and 'E' keys together. 

DISABLING THE ESCAPE KEY & DESTROYING PROGRAMS 
*FX 200,0 Re-enables the Escape key. 
*FX 200,1 Will disable the Escape key. 
*FX 200,2 enables the Escape key, but pressing Break will clear the memory, 

preventing the program being retrieved with OLD. 
*FX 200,3 disables the Escape key, and clears the memory on Break. 

m ^h ^H ^H HM ■■* ^B ^H ^M ^H ^H ^H ^™ ^™ OH ■> ^M ^M ^H ^" ^™ ^™ *^W ^™ ^™ ^™ ^™ ^™ ^™ ^™ ^™ ^^ ^™ ^™ ^™ ^™ ^™ ^™ ^™ ^^ ^"* ^™ ^ 

*COMMANDS - A.Pemberton 

When using the structure IF.. -THEN *<corrrr.and>, the THEN is not Optional. 

LOWER CASE BASIC - A. Armstrong 

If you redefine the two characters @ and } by running the following program, you 
will find all upper case letters will now be printed in lower case, yet they still 
work as upper case. 

10 M0DE4 

20 VDU 23,64,60,60,60,60,60,60,60,60 

30 VDU 23,125,0,0,255,255,255,255,0,0 
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USING BBC MICRO PROGRAMS ON AN ELECTRON (Part 1) 

by David Graham 

It is early days for the Electron, and software to run on it (like 

the machine itself?) is in short supply. So why not convert some of 

the many available BBC micro programs to run on your Electron. David 
Graham looks into the problem. 



The Electron has many things in 
common with its big brother the BBC 
micro, and the Electron was designed to 
be compatible with the Beeb in as many 
respects as possible- It should 
therefore be possible to convert some 
of the many programs for the Beeb to 
run on your Electron. After all they 
both run an identical version of BBC 
Basic. 

In spite of the extreme similarities 
between the machines however, there are 
many things to look for when converting 

software, as we have discovered in our 
conversions of certain BBC micro 
programs for presentation in ELBUG. For 
this reason, a word of warning is in 
order. It is not advisable to buy 
commercial BBC software in the hope 
that it will run on the Electron. The 
chances are either that it will not run 
at all or at least that it will not run 
satisfactorily. This is especially true 
of games, which are usually in machine 
code, and which will generally be 
protected; so making them doubly 
difficult to modify. On the other hand, 
there is no harm in trying to load in a 
borrowed BBC micro cassette - the 
recording format is identical, and you 
might just be lucky. 

In this article I shall be concerned 
with the modification for the Electron 
of programs written in Basic. But even 
here there are certain kinds of program 
which will not yield good results - and 
should be avoided. These are as 
follows: 

1. Programs written largely in Mode 
7 (see later) - especially those using 
Mode 7 graphics. 

2. Programs in which multi-voice 
music is essential - e.g. a 3 voice 
rendition of a Bach Cantata. 



3. High speed games 
those for which the use of 
or 2 is essential. 



- especially 
modes , 1 



4. Programs for which printers, 
light pens or joysticks are essential. 

5. Programs which use the timer in 
the second 6522 chip in the Beeb 
(extremely rare in Basic programs) . 

This list may give the impression 
that the majority of BBC micro programs 
cannot be used on the Electron. This is 
not in fact the case as we have 
discovered, though conversion often 
involves considerably more than 
altering a couple of program lines. 



GETTING STARTED 

If you have a program 
you wish to use on the 
probably best to type 
Electron and try to run 
instance. After all 
faultlessly. It is more 
that certain "fixes' wi 
The remainder of the art 
some of the problems tha 



Table 1 gives a list of potential 
problem areas. Ttie three major 

difficulties arise from the Electron's 

lack of a Mode 7, its pruned down SOUND 

and ENVELOPE facilities, and its slower 

speed (especially noticeable in modes 
to 3). 

Of these, the latter often proves to 
be the most troublesome in games 
programs. Mode 7 can also cause a few 
headaches, though these are rarely 
insurmountable. SOUND and ENVELOPE 
incompatibilities are not often so 
serious, if only because the production 
of authentic sounds and sound effects 
is not usually vital to a program. We 
begin our survey with a look at Mode 7. 



listing 
Electron, 


that 
it is 


it into 
it in the 


your 
first 


it may work 
likely however 
11 be required. 
icle will cover 
t might arise. 
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TABLE 1 

Program Conversion Problems 

BBC micro to Electron 

MODE 7 

The Electron has no Mode 7. 

SOUND 

The BBC micro has 4 sound channels (1 
noise and 3 tone) ; the Electron has 2 
only, 1 noise and one tone, On the BBC 
micro sound may have 16 different 
volume levels. On the Electron sound is 
either on or off. 

ENVELOPE^ 

The BBC micro may have up to 16 
Envelopes simultaneously defined. The 
Electron allows one only. Of the 14 
parameters in an Envelope on the BBC 
micro only the first 8 are used on the 
Electron because amplitude is not 
variable. 

SPEED 



The Electron runs a little slower than 
the BBC micro in modes 4, 5 and 6. In 
modes 0, 1 , 2 and 3 it is considerably 
slower. 

CURSOR DELETE 

Certain versions of the cursor delete 

command on the BBC micro do not work on 

the Electron. 

OTHER VDU23 CALLS 

Certain other VDU 23 calls on the BBC 
micro - such as the ones which permit 
sideways scrolling and other forms of 
so called hardware scrolling, and 
changing the picture height are not 
implemented on the Electron. 

JOYSTICKS 

The ADVAL statement in BBC Basic with 
which the BBC micro reads the state of 
its analogue port, into which joysticks 
and other devices may be plugged, has 
no effect on a basic Electron (though 
hardware add-ons may implement this) . 

*FX CALLS 



Certain *FX calls implemented on the 
BBC micro are not implemented on the 
Electron. These will mostly be 
associated with hardware not interfaced 



to the 
interface. 



Electron - e.g. printer 
analogue interface, video 



controller chip, 6522 etc. 



MODE 7 

The BBC micro has eight possible 
screen modes compared to the Electron's 
seven. Mode 7 on the BBC micro is not 
implemented on the Electron, and has no 
direct equivalent. In fact Mode 7 is a 
rather unusual mode in many respects. 
It takes only IK of user memory so that 
very long programs which only use Mode 
7 on the BBC micro might actually be 
too long to run on the Electron (since 
the most economical mode on the 
Electron is Mode 6 taking 8K) . 

Most programs will not fall into 
this category however. The other major 
differences with Mode 7 are its ability 
to display all 8 colours as well as 
flashing and double height text; and 
its different screen format (40 lines 
of 25 characters) - Mode 6 for example 
is 40 by 32. 

In practice. Mode 7 is used mainly 
for displaying text on the BBC micro - 
such as program instructions, games 
high scores etc. Fortunately, Mode 7 
text is usually readable on a Mode 6 
screen, and moreover the instruction 
"MODE 7" is read by the Electron as 
"MODE 6", so that a BBC micro program 
that uses Mode 7 to display 
instructions will run on an Electron 
(providing it is not dumped as raw code 
to the screen area). But you will 
usually need to clean up the display 
somewhat . 

Perhaps the best way to do this is 
to run the program, and take a good 
look at the screen. If text appears to 
be repeated on a pair of consecutive 
lines it probably means that the double 
height facility is in use. For example, 
the following lines will produce the 
word ELECTRON once only in double 
height on a BBC micro. It would print 
twice on an Electron. 

10 MODE 7 

20 PRINT CHR$141;"ELECTR0N" 

30 PRINT CHR$1 41; "ELECTRON" 

To make this print the word once 
only on an Electron, delete line 30. 
The CHRS141 in line 20 should also be 
removed. Character 141 is the Mode 
code for double height. 

Mode 7 uses codes for a variety of 
purposes, and although these may have 
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no effect in Mode 6, they can sometimes 
cause spurious characters to appear on 
the screen. You may also need to remove 
strings of lower case letters and other 
symbols from PRINT statements. For 
example the line 

10 PRINT CHR$145;"ffffffffffffff' , 
will print a neat grid across the 
screen in red in Mode 7. The CHR$145 in 
Mode 7 tells the computer to print 
certain letters following it as red 
graphics characters. In other modes 
CHR$ is interpreted differently, and 
the letters are printed as they appear 
in the program - as a row of f's. On an 
Electron in Mode 6, you will just get a 
row of lower case 'f's in white - 
possibly preceded by an odd shape if 
character 145 happens to be defined in 
your machine at the time. The simple 
answer is to delete the whole line. 

The screen shots with this article 
demonstrate the problem clearly. The 
first is of the header of a BEEBUG 
painting program. The logo uses Mode 
graphics, and the words PAINT BOX are 
in double height. The same program run 
on an Electron produces a quite 
unrecognizable mess - note the double 
printing of the words PAINT BOX. 
Generally speaking the best approach is 
to redesign such pages using the 
facilities of other modes. Fortunately 
it is usually only the graphics of Mode 
7 which become unreadable in other 
modes. The text, and this is usually 

the most important part, is generally 
legible, and will appear at more or 
less the same point on the screen as in 
Mode 7. 

It is possible to recreate most of 
the effects available in Mode 7 in 
modes which will run on the Electron, 
is no simple rule of thumb, 
need to use graphics 
that you define yourself to 
many pre-defined graphics 
of Mode 7, and to use the 
to reproduce the Mode 



but there 
You wi 1 1 
characters 
replace the 
characters 
COLOUR statement 
7 colours. 



You cannot reproduce Mode 7 too 
closely however, since the only full 
colour mode on the Electron is Mode 2 
and this only allows 20 characters of 
text per line. For this reason the best 
mode to replace Mode 7 will be either 
1 , 4 or 6. The disadvantage with 4 and 
6 is that only two colours are allowed. 






£4*1 <-" 



BBrrffHiiifHiiliffffifttiM 



Mole 1 gives you 4 colours and 40 
characters per line, but it also uses 
up 20K of memory compared to the 
miserly IK of Mode 7. This will not 
cause problems as long as your program 
is shorter than 8.5K. Otherwise you 
will get a 'Bad mode' error message. 

Next month we shall look at other 
problems of program conversion such as 
the use of Sound and Envelope commands. 
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MORE NEW BOOKS FOR ELECTRON USERS 

reviewed by Mike Williams 



This month 
users. 



we look at two more books on programming for Electron 



Book : The Electron Programmer 
Authors : S.M.Gee and Mike James 
Publisher: Granada 
Price : £5.95 
ISBN 0-246-12340-0 

This book is intended for the 
newcomer to programming in Basic. It 
provides a comprehensive coverage of 
Basic on the Electron and there is some 
emphasis, particularly in the 
introduction, on the need to write well 
structured and readable programs. The 
book does its job in a sound if rather 
unexciting way. The various chapters 
cover progressively, the basic features 
of the language, control statements 

(GOTO, IF-THEN, REPEAT-UNTIL, 
FOR-NEXT) , procedures and functions, 
text, integers, arrays, so called 'low 
resolution' graphics (using PRINT TAB) , 
sound, and high resolution graphics 

(MOVE, DRAW, PLOT etc). 



Each chapter 



pattern. 



follows 
fairly 



the same 
systematic 



description and definition of each new 
language feature followed by a few, 
often mathematical, examples. This 
makes for very solid reading. I am not 
too happy about the preponderance of 
mathematical programs. Character 

strings and particularly graphics can 
be used from an early stage to provide 
much more interesting examples. After 
all, it is for their excellent graphics 
capabilities that many home users are 
attracted to buy their micro in the 
first place. On a slightly more 
academic point, it is a pity that the 
authors have not adopted the standard 
notation for thir definitions of 
syntax, but have felt obliged to 
introduce their own. 

Although this book certainly does 
place some emphasis on programming 
style and structure, it is a pity that 
this approach is not used from the 
start. Likewise, with statements such 
as IF-THEN, less structured versions 



FtOtiftAMiM 




f'V«F^OA*ff 



are introduced first with better 
structured versions and examples 
following later. 

Overall, this book provides a sound 
description of Basic programming on the 
Electron. More diagrams and a less 
formal style would have made the book 
much more enjoyable reading. After all, 
programming the Electron for the home 
user can and should be fun! 



Book 



on 



the 



:Basic Programming 

Acorn Electron 
Authors :Neil Cryer and Pat Cryer 

PublisherrPrentice Hall International 
Price :£6.95 
ISBN 0-13-066259-3 

This is another book on Basic 
programming for the beginner and with 
just over 300 pages is positively 
packed with ideas and information, 
sufficient to keep the new Electron 
user busy for quite some time. The book 
contains many example programs and 
screen displays to illustrate the 
techniques described, and to provide a 
storehouse of routines to interest and 
entertain the user. 

Ttie book starts with a useful 
description of the Electron, its 
keyboard and its operation. It is very 
pleasing to see the idea of the 
procedure being introduced at a very 
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early stage in the book (in the second 
chapter) and procedures form the basis 
of the majority of the examples 
throughout the book. 

There is a useful chapter on saving 
and loading programs on cassette 
followed by basic programming 

information. The chapters progressively 
describe all the structured features of 
Electron Basic including REPEAT-UNTIL 
and IF-THEN-ELSE. There is no mention 
of GOTO or any of the unstructured 
forms of IF-THEN until very late in the 
book, which does avoid introducing the 
user to any bad programming habits. 
There is detailed coverage of all 
aspects of sound and graphics on the 
Electron, including animation 

techniques and user-defined characters. 

One point of criticism is the 
quality of presentation and 

reproduction. The text appears to have 
been printed directly from computer 
generated material on a daisywheel 
printer with rather variable quality. 



The program listings are in at least 
three different type faces including 
dot matrix printer listings and two 
styles of daisywheel printer listings. 
This has the unfortunate result that 
the figure zero is sometimes printed as 
'0' and sometimes as '0'. Consistency 
of presentation is desirable, while it 
would have improved the general 
appearance of the book if the text had 
been typeset. 

One further point is that example 
programs and screen displays are quite 
often allowed to break up the main flow 
of the text and on several occasions I 
was not sure where to continue reading. 

I liked both the content and the 
style of presentation of this book, and 
with so much packed into its 300 plus 
pages it really is good value at the 
price. It also has the rare merit with 
regard to structured programming of 
practicing what it preaches from 
beginning to end. 




THE BEST OF ELBUG 

Many of the best programs published in ELBUG have been collected together and 
published by Penguin Books under the name "Games and other programs for the Acorn 
Electron" at £3.95. This book is part of the Penguin Acorn Computer Library and at 
present there is just one other title available though others are planned. 

There are 20 programs in all in four different categories: 
Action Games 

Munch-Man Mars Lander 
Robot Attack Hedgehog 



Invasion 



Thought games 

Higher/Lower Five-Dice Life 

Anagrams Return of the Diamond 



Games 

for the Acorn 



ELECTRON 



Visual Displays 
Union Jack 
Screenplay 



Square Dance Ellipto 
3-D Rotation 



Utilities 

Sound Wizard Bad Program Lister 
3-D Lettering Bad Program Rescue 
Double Height Text 



■ea rm c* mm » m i 
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All 20 programs are now available on cassette from our software address {in High 
Wycombe) price £7 to members and £9 to non-members, plus 50p post & packing in 
either case. 



ELBUG 



March 1984 



Volume! Issue-4 



32 



BLOCK BLITZ 

by D. J. Pilling 



The following program is one of the most entertaining games we have 
seen, and will well repay the effort spent in typing it into your 
micro. It uses colour, graphics and sound to produce a fast and 
original action game that compares very favourably with the 
commercial games currently available. 

In this game, you are trapped in a 
series of caverns, from which you have 
to escape whilst being bombarded by 
blocks, dropped from above by a very 
mobile crane. As the blocks fall 
towards you, you must try to dodge them 
if you want to stay alive, but your 
only way of making good your escape is 
to climb onto the blocks, and up to the 
height of the walls. The crane is 
quite intelligent, and will try and 
drop the blocks on you, giving you the 
chance to practice some risky 
brinkmanship as you lure the blocks 
into the places that will best help you 
make your exit. If you succeed, a 
gantry extends from one of the walls, 
allowing you to escape. You are then 
thrown into an even deeper cavern! 




You move the man using the left and 
right cursor keys, and he will also 
climb over any blocks in the way, 
provided he doesn't have to step up or 
down more than one block at a time. You 
will need to be very alert to avoid 
being trapped on a column, or between 
two high walls of blocks. A 
demonstration version of the game is 
also included as part of the program 
which shows how easy it all is! 



« ■ m. « * 
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;-:-:•:-:■:•:•:•:■:■:•:•:•:•:•:•:•:•:■: 
: ::: : : : ::::: : : : ::::::: : : : :;::: : :::::::: 


■:-:-::v:-:-:-:-:-:«::s;ft^:S'SH«'S« ; S»K® 


10 


REM PROGRAM 


BLOCK BLITZ 


20 


REM VERSION 


E0.1 


30 


REM AUTHOR 


D.J. PILLING 


40 


REM ELBUG 


MARCH 1984 


50 


REM PROGRAM 


SUBJECT TO COPYRIGHT 


60 



• 




70 


ON ERROR GOTO 250 


80 


DIM S%(19,31),MAN$(5,1) 


90 


PRCCchar 




100 


REPEAT 




110 


MODE 4 




120 


PROCsetupuser 


130 


MODE 5 




140 


PROCsetup 





150 REPEAT 

1 60 PROCscreen 

170 REPEAT 

180 PROCblrPROCm 

190 UNTIL end% 

200 PROCgame 

210 UNTIL demo% 

220 UNTIL FALSE 

230 END 

240 : 

250 ON ERROR OFF: MODE 6 

260 IF ERROT7 THEN REPORT: PRINT" at 
line ";ERL 

270 END 

280 : 

290 DEF PRCCchar 

300 a$=CHR$8:b$=CHR$10:c$=CHR$ll 

310 d$=CHR$17:e$=CHRS32 

320 f$=STRING$(14,CHR$32) :g$=STRING$( 
5,CHR$32) 

330 VDU23, 224, 28, 48, 62, 20, 28, 60, 126,1 

89 

340 VDU23,225, 189,60,24,24,56, 104,200 

,76 K 

350 VDU23, 226, 189, 60, 24, 24, 28, 23, 18, 24 
360 VDU23, 227,1 89,60,24,24,28,23,1 8,48 
370 VDU23, 228, 189, 60, 24, 24, 56, 104, 200 

,88 

380 VDU23, 229, 28, 6, 62, 20, 28, 60, 126, 189 
390 VDU23, 240, 60, 90, 126, 60, 36, 126, 255 

,189 
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400 70023,243,255,129,255,129,66,36,2 

4,255 

410 VDU23, 244, 0,1 27, 127, 127, 127, 127,1 

27,0 

420 VDU23, 245, 255, 255, 255, 255, 255,255 

,255,255 

430 VDU23, 246, 0,1 26, 126, 126, 126, 126,1 

26,0 

440 VDU23, 247,0, 231 ,231 ,231 ,231 ,231 ,2 

31,0 

450 VDU23, 248, 189, 189, 60, 36, 36, 36, 36, 

102 

460 VDU23, 249, 11 9, 34, 34, 127, 127,65,65 

,99 

470 VDU23, 250, 189, 21 9, 255, 189, 165, 255 

,255,60 

480 VDU23, 251, 60, 60, 60, 36, 36, 36, 36, 102 
490 ENVELOPE!, 3, 0,2, 0,0, 255, 0,1 27, 0,0 

,-127,80,80 

500 R$=d?+CHR$l:Y$=d$+CHRS2 

51 W$=d$+CHR$3 

520 M$=W$+CHR$240+b$+aS+R$+CHR$248 

530 MJ$=b$+e$+a$+c$+R$+CHR$251 +a$+c$+ 

W$+CHRS250 

540 MK$=c$+e$+b$+a$+W$+CHR$240+a$+b$+ 

R$+CHR$248 

550 f$=e$+W$+CHR$224+b$+a$+a$+e$+R$ 

560 MAN$(l,0)=f$+CHR$225 

570 MAN$(l,l)=f$+CHR$226 

580 f$=eS+aS+a$+W$-fCHR$229+b$+eS+a$+a 

$+R$ 

590 MANS (0,0) =£$+CHR$227 
600 MANS(0,l)=f$-K:HRS228 
61 f $=b$+e$+c$+aS+e$+R$:gS=a$+c$4W$+ 

CHRS224 

620 MAN$(3,0)=f$+CHR$225+g$ 

630 MAN$(3,l)=f$+CHR$226+g$ 

640 f$=e$+a$+b$+e$+W$+CHR$224+a$+b$+R$ 

650 MAN$(5,0)=f$+CHR$225 

660 MAN$(5,l)=f$+CHR$226 

670 f $=b$+e$+c$+a$+e$+aS+a$+R$ :g$=a$+ 
c$+W$+CHR$229 

680 MAN$(2,0)=f$+CHR$227+g$ 

690 MAN$(2,l)=f$+CHR$228+g$ 

700 f$=e$+a$+b$+e$+a$+a$+W$+CHR$229+a 
$+b$+R$ 

710 MANS (4,0) =f$-tCHR$227 

720 MANS(4,l)=fS-fCHR$228 

730 B$=R$+CHR$249+a$+b$+Y$+CHR$244 

740 TL$=eS+a$+aS+R$-K:HR$249 

750 TR$=eS+R$+CHR$249 

760 BL$=TL$+a$+b$+Y$+CHR$244+e$ 

770 BR$=TR$+a$+a$+b$+e$-t-Y$+CHR$244 

780 BD$=Y$+e$+a$+b$4CHR$244 

790 WALL$=CHR$246+CHR$246+c$+a$+a$+CH 

R$247 +CHR$247+cS+a$+a$ 

800 HI%=0:SC%=0 

810 ENDPRCC 

820 : 

830 DEF PROCsetup 




840 VDU23,1;0;0;0;0:VDU29,640;512; 

850 IF HI%<SC% THEN HI%=SC% 
860 H%=4:N%=1:M%=0:MEN%=3 

870 SC%=FNsc(H%):SCT%=0 

880 ENDPROC 

890 : 

900 DEF PRCCscreen 

910 CLS:COLOURl 

920 PRINTTAB(0,0)"H ";HI%;TAB<9) ;"S " 

;SC%;TAB(17)"M ";MEN% 
930 C0L0UR2 

940 g$=STRING$(2,CHRS243) 
950 PRINTTAB(0,l)STRINGS(10,g$); 
960 PRINTTAB(0,6)g$ TAB(18,6)g$; 
970 PRINTTAB(0,29-H%)g$ TAB(18,29-H%) 

gS; 

980 C0L0UR2:PRINTTAB (0,30) STRINGS (20, 

CHRS245); 

990 PRINTTAB(0,30)STRING$(20,CHRS245); 

1 000 C0L0UR1 31 :C0L0UR1 
1010 g$=STRING$(H%/2, WALLS) 
1020 PRINTTAB(0,29)g$; 
1030 PRINTTAB(18,29)g$; 
1040 COLOUR128 
1050 FOR J%=0 TO 31 
1060 FOR I%=0 TO 19 

1070 IF J%=30 THEN S%(I%,J%)=2 ELSE S% 
(I%,J%)=0 
1080 NEXT I%,J% 

B%=28:A%=10:NG%=FALSE:end%=FALSE 

PRINTTAB(A%,B%)M$ 

Y%=3:IF RND(2)=1 THEN X%=0 ELSE 



1090 
1100 
1110 

X%=19 
1120 
1130 
1140 
1150 
1160 

CC 
1170 
1180 
1190 

230 



ENDPRCC 

9 

DEF PRCCm 

IF M%=0 THEN M%=1 ELSE M%=0 

IF S%(A%,B%)<>0 THEN PROCngrENDPR 

IF demo% THEN 1200 

IF INKEY-26 THEN IF A%>2 THEN 1280 

IF INKEY-122 THEN IF A%<17 THEN 1 
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1200 IF NOT demo% THEN PRINTTAB (A%,B%) 
M$;:ENDPROC 

1210 IF Y%<=3 OR XIOAI THEN PRINTTAB( 
A%,B%)M$;: ENDPROC 

1220 IF A%=10 THEN 1280 

1230 IF S%(A%+1,B%)<>0 THEN ENDPROC 

1240 IF S%(A%+1,B%+1)=2 THEN PRINTTAB( 
A%,B%)MAN$(3,M%):A%=A%+l:B%=B%-l:GOTO 1 
320 

1250 IF S%(A%+l,B%+2)=2 THEN PRINTTAB ( 
A%,B%)MAN$(l,M%):A%=A%+1:GOTO 1320 

1260 IF S%(A%+1,B%+3)=2 THEN PRINTTAB ( 
A%,B%)MAN$(5,M%):A%=A%+l:B%=B%+l:GOTO 1 
320 

1270 ENDPROC 

1280 IF S%(A%-1,B%)<>0 THEN ENDPROC 

1290 IF S%(A%-1,B%+1)=2 THEN PRINTTAB( 
A%,B%)MAN$(2,M%):A%=A%-l:B%=B%-l:GOTO 1 
320 

1300 IF S%(Al-1,B%+2)=2 THEN PRINTTAB ( 
A%,B%)MAN$(0,M%):A%=A%-1:GOTO 1320 

1310 IF S%(A%-l,B%+3)=2 THEN PRINTTAB( 
A%,B%)MAN$(4,M%) :A%=A%-1 :B%=B%+1 

1320 IF S%(A% f B%)<>0 THEN PRCCng:ENDPR 
CC 

1330 IF B%=27-H% THEN PROCwin: ENDPROC 

1340 ENDPROC 

1350 : 

1360 DEF PROCng 

1370 end%=TRUE:NG%=TRUE:MEN%=MEN%-l 

1380 SOUND&0011,0,0,0:SOUND0,-15,5,12 

1390 PROCbonk 

1400 ENDPROC 

1410 : 

1420 DEF PROCd(T%) 

1430 T%=TIME+T% 

1440 REPEAT UNTIL TIME>T% 

1450 ENDPROC 

1460 : 

1470 DEF PROCwin 

1480 IF S%(X%,Y%)=1 THEN PRINTTAB (X%,Y 
%)e$;:SOUND&0011, 0,0,0 

1490 PRINTTAB(A%,B%)M$; 

1500 end%= ; TRUE:COLOUR2 

1510 IF A%=2 OR A%=17 THEN 1540 

1520 D%=A% 

1530 IF A%<9 THEN FOR C%=2 TO A%-1:PRI 
NTTAB(C%,B%+2)CHR$243:SOUND2,-l 0,1 00,1: 
PROCd(15):NEXT ELSE FOR C%=1 7 TO A%+1 S 
TEP-1 : PRINTTAB (C%,B%+2) CHR$243:SOUND2,- 
1 0, 1 00, 1 : PROCd (1 5) : NEXT 

1540 REPEAT IFA%<9 PRINTTAB(A%,B%)MANS 
(0,M%):PROCd(15):A%=A%-l ELSE PRINTTAB( 
A%,B%)MAN$(l,M%):PROCd(15):A%=A%+l 

1550 IFM%=0 THEN M%=1 ELSE M%=0 

1560 UbTTIL A%=1 OR A%=1 8 

1570 IF D%=2 OR D%=17 THEN 1630 

1580 COLOUR2:PRINTTAB(A%,B%)M$; 

1590 IF D%<9 THEN FOR C%=D%-1 TO 2 STE 
P-l:PRINTTAB(C%,B%+2)eS:SOUND2,-10,100, 



l:PROCd(15):NEXT ELSE FOR C%=D%+1 TO 17 
:PRINTTAB(C%,B%+2)e$:SOUND2,-10,100,l:P 
ROCd(15):NEXT 

1600 COLOUR0:COLOUR1 31 

1610 IF A%=1 PRINTTAB (3, B%-1 ) "YIPPEE" 
ELSE PRINTTAB(11,B%-1)"YIPPEE" 

1620 COLOUR128 

1630 FOR I%=1 TO 10:PRINTTAB(A%,B%)MJ$ 
;:SOUND0,-15,4,l:PROCd(8):PRINTTAB(A% / B 
%} MK$; : SOUND0, -1 5,6 , 1 : PROCd (8) : NEXT 

1640 IF A%=1 PRINTTAB (3, B%-1)SPC (6) EL 
SE PRINTTAB (11,B%-1)SPC (6) 

1650 PROCd (150) 

1660 ENDPROC 

1670 : 

1680 DEF PRCCbl 

1690 IF Y%=3 THEN 1800 

1700 IF T%>9 THEN 1720 

1710 IF T%>0 PRINTTAB(T%,2)TL$:T%=T%-1 
:GOTO 1730 ELSE PRINTTAB(0,2)e$:GOTO 17 
30 

1720 IF T%<19 PRINTTAB(T%,2)TRS:T%=T%+ 
1 ELSE PRINTTAB(19,2)e$ 

1 730 PRINTTAB (X%, Y%) BD$: S% (X%, Y%) =0: Y% 
=Y%+1:S%(X%,Y%)=1:IF S%(X%,Y%+1)<>2 THE 
N ENDPROC 

1740 S%(X%,Y%)=2 

1750 SOUND&0011,0,0,0:SOUND0,-15,4,1 

1760 IF T%<>0 AND T%<>19 Y%=Y%-1 :ENDPR 
OC 

1770 IF RND(1)>.5 THEN X%=19 ELSE X%=0 

1780 SC%=SC%-10:PRINTTAB(11,0)SPC(5)TA 
B(11,0)RS;SC% 

1790 Y%=3:PRINTTAB(X%,2)B$;:ENDPRCC 

1800 SOUND2, -10,60,1 

1810 IF (A%=X% AND RND(1)>.5) THEN 1860 

1820 IF dano% THEN 1840 

1830 IF ABS(A%-X%)<2 THEN IF RND(1)>.8 

THEN 1860 

1840 IF A%<X% THEN PRINTTAB(X%,2)BL$:X 
%=X%-1 ELSE PRINTTAB(X%,2)BR$:X%=X%+1 

1850 ENDPRX 

1860 IF X%<2 OR X%>17 ENDPROC 

1870 T%=X%:SOUND1,1,350,90:GOTO1730 

1880 : 

1890 DEF PRCCgame 

1900 IF NG% AND MEN%=0 THEN PROClost:P 
ROCsetup: ENDPROC ELSE IF NG% THEN PROCc 

ng: ENDPROC 

1910 N%=N%+l:H%=H%+2 

1920 IF H%=18 THEN PROCover:PROCsetup: 
ENDPROC 

1930 PROCccg 

1940 ENDPROC 

1950 : 

1960 DEF FNsc(H%)=160*<H%+!) 

1970 : 

1980 DEF PROCr: REPEAT UNTIL INKEY-74:E 

NDPROC 

1990 : )} 
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2000 DEF PROCsetupuser 
2010 VDU19,1,3;0;19,0,4;0; 
2020 PRINTTAB(10,3)"B L C 

Z" 

2030 PRINTTAB(1 0,4) STRINGS (20,"=") 

2040 PRINTTAB (0,7)" You have been imp 
risoned by the evil"'" Dr. X in an ever 

deeper series of"'" caverns. To add to 

your problems, they"'" are being fille 
d in with blocks aimed""' at you!" 

2050 PRINT"" However if you can reac 
h the level of"'" the brick sides by st 
anding on the""' blocks you can escape 
from each cavern""* and eventually from 

all of them." 

2060 PRINT'"' You move by using the 1 
eft and right""' cursor keys but you ca 
n only leap up""' and down one block at 

a time." 

2070 *FX15,0 

2080 PRINT' "' Do you want a demo ? (Y 
/N) "; 

2090 IKS=GETS:IF IKS="Y" THEN demo%=TR 
UE ELSE IF IKS="N" THEN demo%=FALSE ELS 
E GJTQ 2090 

2100 ENDPRCC 



2110 
2120 
2130 
2140 



DEF PROCcng 
SC%=SCT% : CLS : C0L0UR2 
PRINTTAB (4,5) "OH DEAR ! "TAB (4, 7)" 
YOU LOST"TAB(4,9)"A MAN" 
2150 PROCsctab: SC%=SC%+FNsc<Hfc) 
2160 ENDPROC 
2170 : 

2180 DEF PROCccg 
2190 SCT%=SC%:CLS:COLOUR2 
2200 PRINTTAB(2,5)"NEXT — >"TAB{2,8) "C 
AVERN NUMBER ";N% 
2210 PROCsctab :SC%=SC%+FNsc (HI) 
2220 ENDPROC 
2230 : 



2240 DEF PROCsctab 
2250 VDU19, 1,6, 0,0,0 
2260 CODDUR1 

2270 PRINTTAB (4 , 1 4) "MEN " ;MEN% 

2280 PRINTTAB (4, 16) "SCORE ";SC% 

2290 PRINTTAB (4,1 8) "HISCORE. . ,";HI% 
2300 C0L0UR2:PRINTTAB(1, 28) "RETURN TO 
CONTINUE" 
2310 PRINTTAB (1,28) "RETURN TO CONTINUE" 

PROCr : VDU 1 9 , 1 , 1 , , , 

ENDPROC 



2320 

2330 

2340 

2350 
2360 



DEF PRCCover 
CLS :COLOUR2 

2370 SC%=SC%+MEN%*FNsc{18) 

2380 PRINTTAB (2, 3) "C0NGRATULATI0NS M TAB 
(2,6) "YOU HAVE ESCAPED"TAB (2,8) "FROM AL 
L THE"TAB(2,10)"THE CAVERNS" 

2390 PROCsctab 

2400 ENDPROC 

2410 : 

2420 DEF PROClost 

2430 CLS:C0L0UR2:SC%=SCT% 

2440 PRINTTAB (4 ,4) "GAME OVER"TAB(4,6) " 
YOU RAN OUT"TAB(4,8)"OF MEN" 

2450 PROCsctab 

2460 ENDPRCC 

2470 : 

2480 

2490 

2500 
:MGVE 



DEF 
CLS 



PRCCbonk 



FOR X%=150 TO 500 STEP 50:GCOL0,1 
X%,XI:DRAW X%,-X%:DRAW -X%,-X%:DR 
AW -X%,X%:DRAW X%,X%:X%=X%+50:G3OL0,2:M 
OVE X%,X%:DRAW X%,-X%:DRAW -X%,-X%:DRAW 
-X%,X%:DRAW X%,X%:NEXT 
2510 COLOUR3:PRINTTAB(6,15)"B N K!" 
2520 FOR I%=1 TO 8:VDU19,1 ,3,0,0,0,19, 
2,1, 0,0,0:PROCd(8):VDUl9,l,l,0,0,0,19, 

2 r 3,0 ,0,0:PROCd(8):NEXT 
2530 ENDPRCC 
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Trxis game is Jtuch irore exciting than 
nuny garos of a similar nature, are! 
onre playtd P proves to be surprisingly 



Snake is a very addictive, fast 
moving arcade game. The purpose of the 
gam? is to direct the snake arourd the 
screen, eating up the randomly pl3red 
objects. With every oite that it takes, 
the tail grows longer and tne snake 
moves faster. Just to complicate 
things, there are also certain 
scattered obstacles wmch must be 
avoided. 



TO even complete the first screen 
requires skill and corvrentration. 
Further frames use different shaped 
playing areas, which as well as addmj 
variety, require much greater skill to 
complete. 

Snake costs £4-00 inc VAT. Please add 5Jp post t> jacking. 
CX-erseas orders: £5.5i) inc post & packing - VAT not charged. 
Send order with membership number to: 
ufct-nLGSor:, p.o. &>x iuy, min w/ccnb*, sucks hpi zro. 
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